kohabug 2105: prevent crash on IE7

[koha.git] / cataloguing / addbooks.pl

diff --git a/cataloguing/addbooks.pl b/cataloguing/addbooks.pl
index 7efc178..1876133 100755 (executable)
--- a/cataloguing/addbooks.pl
+++ b/cataloguing/addbooks.pl
@@ -1,6 +1,5 @@
 #!/usr/bin/perl
 
-# $Id$
 
 # Copyright 2000-2002 Katipo Communications
 #
@@ -69,7 +68,7 @@ foreach my $thisframeworkcode ( keys %$frameworks ) {
 if ($query) {
 
     # find results
-    my ( $error, $marcresults ) = SimpleSearch($query);
+    my ( $error, $marcresults, $total_hits ) = SimpleSearch($query);
 
     if ( defined $error ) {
         $template->param( error => $error );
@@ -78,17 +77,9 @@ if ($query) {
         exit;
     }
     
-       if(not defined $marcresults){
-               $template->param(query => $query);
-               warn "no result found";
-               output_html_with_http_headers $input, $cookie, $template->output;
-        exit;
-       }
-
     # format output
     my $total = scalar @$marcresults;
-    my @newresults = searchResults( $query, $total, $results_per_page, $page, @$marcresults );
-    
+    my @newresults = searchResults( $query, $total, $results_per_page, $page-1, @$marcresults );
     $template->param(
         total       => $total,
         query       => $query,
@@ -135,6 +126,7 @@ for ( my $i = 0 ; $i <= $#resultsbr ; $i++ ) {
 
 $template->param(
     frameworkcodeloop => \@frameworkcodeloop,
+    breeding_count    => $countbr,
     breeding_loop     => \@breeding_loop,
 );