[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;