From ad5d56adf615e98b2057114f685baff09f45d213 Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Thu, 23 Jan 2003 12:31:23 +0000
Subject: [PATCH] *** empty log message ***

---
 loadmodules.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/loadmodules.pl b/loadmodules.pl
index ed51f057ca..35030930bf 100755
--- a/loadmodules.pl
+++ b/loadmodules.pl
@@ -53,8 +53,10 @@ sub acquisitions {
 
 sub catalogue_search {
 	my $aq_type = C4::Context->preference("marc") || "ON";
+	my $query = new CGI;
+	my $type = $query->param('type');
 	if ($aq_type eq 'ON') {
-		print $input->redirect("/cgi-bin/koha/search.marc/search.pl");
+		print $input->redirect("/cgi-bin/koha/search.marc/search.pl?type=$type");
 	} else {
 		print $input ->redirect("/cgi-bin/koha/catalogue-home.pl");
 	}
-- 
2.39.5