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

[Henri-Damien LAURENT]

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