[Koha-cvs] koha/z3950 search.pl [rel_2_2]

Henri-Damien LAURENT laurenthdl at alinto.com
Mon Feb 26 17:48:09 CET 2007


CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_2_2
Changes by:	Henri-Damien LAURENT <hdl>	07/02/26 16:48:09

Modified files:
	z3950          : search.pl 

Log message:
	Bug Fixing var names caused import not to happen

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/z3950/search.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.3.2.20&r2=1.3.2.21

Patches:
Index: search.pl
===================================================================
RCS file: /sources/koha/koha/z3950/search.pl,v
retrieving revision 1.3.2.20
retrieving revision 1.3.2.21
diff -u -b -r1.3.2.20 -r1.3.2.21
--- search.pl	26 Feb 2007 16:24:58 -0000	1.3.2.20
+++ search.pl	26 Feb 2007 16:48:09 -0000	1.3.2.21
@@ -170,7 +170,7 @@
           my $i;
           my $result='';
           if ($numresults>0){
-              @breeding_loop=();
+#               @breeding_loop=();
               for ($i=0; $i<(($numresults<20) ? ($numresults) : (20)) ; $i++) {
                   my $rec=$oResult[$k]->record($i);
                   my $marcrecord;
@@ -195,8 +195,8 @@
                   $row_data{isbn} = $oldbiblio->{isbn};
                   $row_data{title} =$oldbiblio->{title};
                   $row_data{author} = $oldbiblio->{author};
-                  $row_data{breedingid} = $breedingid;
-                  $row_data{biblionumber}=$biblionumber;
+                  $row_data{id} = $breedingid;
+                  $row_data{oldbiblionumber}=$biblionumber;
                   push (@breeding_loop, \%row_data);
               }# upto 5 results
           }#$numresults





More information about the Koha-cvs mailing list