Adding back in code to allow switching between acquisition modules
authorrangi <rangi>
Mon, 21 Apr 2003 04:30:33 +0000 (04:30 +0000)
committerrangi <rangi>
Mon, 21 Apr 2003 04:30:33 +0000 (04:30 +0000)
Not sure why this was deleted, im picking by accident

loadmodules.pl

index 717f491..785b881 100755 (executable)
@@ -36,7 +36,19 @@ SWITCH: {
 }
 
 sub acquisitions {
-               print $input ->redirect("/cgi-bin/koha/acqui/acqui-home.pl");
+    my $aq_type = C4::Context->preference("acquisitions") || "normal"; 
+    # Get the acquisition preference. This should be: 
+    #       "simple" - minimal information required 
+    #       "normal" - full information required 
+    #       other - Same as "normal" 
+     
+    if ($aq_type eq 'simple') { 
+       print $input->redirect("/cgi-bin/koha/acqui.simple/addbooks.pl"); 
+    } elsif ($aq_type eq 'normal') { 
+       print $input ->redirect("/cgi-bin/koha/acqui/acqui-home.pl"); 
+    } else {
+       print $input ->redirect("/cgi-bin/koha/acqui/acqui-home.pl");
+    }
 }
 
 sub catalogue_search {