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

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


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

Modified files:
	z3950          : search.pl 

Log message:
	Asynch print.

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

Patches:
Index: search.pl
===================================================================
RCS file: /sources/koha/koha/z3950/search.pl,v
retrieving revision 1.3.2.19
retrieving revision 1.3.2.20
diff -u -b -r1.3.2.19 -r1.3.2.20
--- search.pl	26 Feb 2007 15:24:01 -0000	1.3.2.19
+++ search.pl	26 Feb 2007 16:24:58 -0000	1.3.2.20
@@ -170,6 +170,7 @@
           my $i;
           my $result='';
           if ($numresults>0){
+              @breeding_loop=();
               for ($i=0; $i<(($numresults<20) ? ($numresults) : (20)) ; $i++) {
                   my $rec=$oResult[$k]->record($i);
                   my $marcrecord;
@@ -205,9 +206,8 @@
     $template->param(breeding_loop => \@breeding_loop, server=>$serverhost[$k],
                 numberpending => $numberpending,
     );
-    output_html_with_http_headers $input, $cookie, $template->output if $numberpending==0;
-
-#  	print  $template->output  if $firstresult !=1;
+    output_html_with_http_headers $input, $cookie, $template->output if $firstresult==1;
+    print  $template->output  if $firstresult !=1;
     $firstresult++;
 
     MAYBE_AGAIN:





More information about the Koha-cvs mailing list