[Koha-cvs] CVS: koha/acqui.simple addbiblio.pl,1.39,1.40 additem.pl,1.25,1.26

Paul POULAIN tipaul at users.sourceforge.net
Tue Jun 29 18:07:43 CEST 2004


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

Modified Files:
	addbiblio.pl additem.pl 
Log Message:
last sync for 2.1.0 release

Index: addbiblio.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/addbiblio.pl,v
retrieving revision 1.39
retrieving revision 1.40
diff -C2 -r1.39 -r1.40
*** addbiblio.pl	10 Jun 2004 09:34:55 -0000	1.39
--- addbiblio.pl	29 Jun 2004 16:07:09 -0000	1.40
***************
*** 344,348 ****
  my $encoding="";
  $record = MARCgetbiblio($dbh,$bibid) if ($bibid);
- # warn "R".$record->as_formatted;
  ($record,$encoding) = MARCfindbreeding($dbh,$breedingid) if ($breedingid);
  
--- 344,347 ----

Index: additem.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/additem.pl,v
retrieving revision 1.25
retrieving revision 1.26
diff -C2 -r1.25 -r1.26
*** additem.pl	3 Jun 2004 09:59:37 -0000	1.25
--- additem.pl	29 Jun 2004 16:07:10 -0000	1.26
***************
*** 201,204 ****
--- 201,213 ----
  		my ($x,$value);
  		($x,$value) = find_value($tag,$subfield,$itemrecord) if ($itemrecord);
+ 		# search for itemcallnumber if applicable
+ 		if ($tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.itemcallnumber' && C4::Context->preference('itemcallnumber')) {
+ 			my $CNtag = substr(C4::Context->preference('itemcallnumber'),0,3);
+ 			my $CNsubfield = substr(C4::Context->preference('itemcallnumber'),3,1);
+ 			my $temp = $record->field($CNtag);
+ 			if ($temp) {
+ 				$value = $temp->subfield($CNsubfield);
+ 			}
+ 		}
  		if ($tagslib->{$tag}->{$subfield}->{authorised_value}) {
  			my @authorised_values;
***************
*** 241,244 ****
--- 250,254 ----
  		} elsif ($tagslib->{$tag}->{$subfield}->{thesaurus_category}) {
  			$subfield_data{marc_value}="<input type=\"text\" name=\"field_value\"  size=47 maxlength=255> <a href=\"javascript:Dopop('../thesaurus_popup.pl?category=$tagslib->{$tag}->{$subfield}->{thesaurus_category}&index=$i',$i)\">...</a>";
+ 			#"
  		} elsif ($tagslib->{$tag}->{$subfield}->{'value_builder'}) {
  			my $plugin="../value_builder/".$tagslib->{$tag}->{$subfield}->{'value_builder'};





More information about the Koha-cvs mailing list