[Koha-cvs] CVS: koha/acqui.simple addbiblio.pl,1.53,1.54

[doXulting]

Update of /cvsroot/koha/koha/acqui.simple
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8698/acqui.simple

Modified Files:
        addbiblio.pl 
Log Message:
Added a new case for =duplicate

Index: addbiblio.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/addbiblio.pl,v
retrieving revision 1.53
retrieving revision 1.54
diff -C2 -r1.53 -r1.54
*** addbiblio.pl        1 Mar 2005 13:40:50 -0000       1.53
--- addbiblio.pl        1 Mar 2005 16:35:09 -0000       1.54
***************
*** 186,190 ****
                        $cgidir = C4::Context->intranetdir."/value_builder";
                } 
!               my 
$plugin=$cgidir."/".$tagslib->{$tag}->{$subfield}->{'value_builder'}; 
                require $plugin;
                my $extended_param = 
plugin_parameters($dbh,$rec,$tagslib,$i,$tabloop);
--- 186,190 ----
                        $cgidir = C4::Context->intranetdir."/value_builder";
                } 
!               my 
$plugin=$cgidir."/".$tagslib->{$tag}->{$subfield}->{'value_builder'};
                require $plugin;
                my $extended_param = 
plugin_parameters($dbh,$rec,$tagslib,$i,$tabloop);
***************
*** 486,489 ****
--- 486,497 ----
  } else {
  
#------------------------------------------------------------------------------------------------------------------------------
+       # If we're in a duplication case, we have to set to "" the bibid and 
biblionumber
+       # as we'll save the biblio as a new one.
+       if ($op eq "duplicate")
+       {
+               $bibid = "";
+               $oldbiblionumber= "";
+       }
+ 
        build_tabs ($template, $record, $dbh,$encoding);
        build_hidden_data;