From 76c3275d120aa3b3585cdb1735cb5ede0903108b Mon Sep 17 00:00:00 2001
From: toins <toins>
Date: Fri, 13 Jul 2007 13:13:41 +0000
Subject: [PATCH] bug fix there was an internal servor error when there is no
 result

---
 cataloguing/addbooks.pl | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/cataloguing/addbooks.pl b/cataloguing/addbooks.pl
index 27db416a28..7efc178fe2 100755
--- 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;
-- 
2.39.2