Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

*** empty log message ***

Browse source
This commit is contained in:
tipaul 2003-01-23 12:31:23 +00:00
parent 6b839bdca2
commit ad5d56adf6
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
loadmodules.pl
View file

@ -53,8 +53,10 @@ sub acquisitions {
sub catalogue_search { sub catalogue_search {
my $aq_type = C4::Context->preference("marc") || "ON"; my $aq_type = C4::Context->preference("marc") || "ON";
my $query = new CGI;
my $type = $query->param('type');
if ($aq_type eq 'ON') { 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 { } else {
print $input ->redirect("/cgi-bin/koha/catalogue-home.pl"); print $input ->redirect("/cgi-bin/koha/catalogue-home.pl");
} }