[Koha-cvs] koha/acqui.simple isbnsearch.pl [rel_2_2]

[Henri-Damien LAURENT]

CVSROOT:        /cvsroot/koha
Module name:    koha
Branch:         rel_2_2
Changes by:     Henri-Damien LAURENT <address@hidden>   06/01/31 10:59:41

Modified files:
        acqui.simple   : isbnsearch.pl 

Log message:
        Bug fixing : result page display was not correct. Id onlys incremented 
one result line and not the whole page

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/acqui.simple/isbnsearch.pl.diff?only_with_tag=rel_2_2&tr1=1.14.2.4&tr2=1.14.2.5&r1=text&r2=text

Patches:
Index: koha/acqui.simple/isbnsearch.pl
diff -u koha/acqui.simple/isbnsearch.pl:1.14.2.4 
koha/acqui.simple/isbnsearch.pl:1.14.2.5
--- koha/acqui.simple/isbnsearch.pl:1.14.2.4    Thu Jan  5 15:11:41 2006
+++ koha/acqui.simple/isbnsearch.pl     Tue Jan 31 10:59:41 2006
@@ -84,6 +84,8 @@
                }
        }
        findseealso($dbh,address@hidden);
+       my $from = $startfrom*$resultsperpage+1;
+       
        my ($results,$total) = catalogsearch($dbh, 
address@hidden,address@hidden,
                                                                                
address@hidden, address@hidden, address@hidden,
                                                                                
$startfrom*$resultsperpage, $resultsperpage,'biblio.title','ASC');
@@ -113,6 +115,14 @@
        if(($total - (($startfrom+1)*($resultsperpage))) > 0 ) {
                $displaynext = 1;
        }
+       my $to;
+
+       if($total < (($startfrom+1)*$resultsperpage))
+       {
+               $to = $total;
+       } else {
+               $to = (($startfrom+1)*$resultsperpage);
+       }
 
        my @field_data = ();
 
@@ -138,15 +148,6 @@
                        }
        }
        }
-       my $from = $startfrom*$resultsperpage+1;
-       my $to;
-
-       if($total < (($startfrom+1)*$resultsperpage))
-       {
-               $to = $total;
-       } else {
-               $to = (($startfrom+1)*$resultsperpage);
-       }
 
     # fill with books in breeding farm
        my $toggle=0;