bug fix there was an internal servor error when there is no result

diff --git a/cataloguing/addbooks.pl b/cataloguing/addbooks.pl
index 27db416..7efc178 100755 (executable)
--- a/cataloguing/addbooks.pl
+++ b/cataloguing/addbooks.pl
@@ -77,6 +77,13 @@ if ($query) {
         output_html_with_http_headers $input, $cookie, $template->output;
         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;