From 4e4ff04a0ef8a0c5e4893f41056dceeb7e45731e Mon Sep 17 00:00:00 2001
From: rangi <rangi>
Date: Mon, 13 May 2002 22:29:27 +0000
Subject: [PATCH] Will work now with the existing C4/Search.pm at least the one
 in the main branch. Will still break with the version in rel-1.2

---
 html-template/search.pl | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/html-template/search.pl b/html-template/search.pl
index 3056dc968a..6815bd0b5f 100755
--- a/html-template/search.pl
+++ b/html-template/search.pl
@@ -8,10 +8,14 @@ use C4::Search;
  
 my $query=new CGI;
 
+# temporary variable for testing. Replace from /etc/koha.conf
+
+my $templatedir="/usr/share/koha/intranet/htdocs/includes/templates";
+
 my $templatename=$query->param('template');
 my $startfrom=$query->param('startfrom');
 ($startfrom) || ($startfrom=0);
-($templatename) || ($templatename='searchresults.tmpl');
+($templatename) || ($templatename="$templatedir/searchresults.tmpl");
 
 
 my $dbh=&C4Connect;  
@@ -31,8 +35,8 @@ my %search;
 my $keyword='bear';
 $search{'keyword'}=$keyword;
 
-my ($count, $resultshash, @results) = &KeywordSearch(\$blah, 'intra', \%search, 20, $startfrom);
-
+my ($count, @results) = &KeywordSearch(\$blah, 'intra', \%search, 20, $startfrom);
+my $resultshash=\@results;
 
 
 
-- 
2.39.5