Merging rel-1-2 changes into main

currency.pl

@@ -6,6 +6,7 @@
 
 use CGI;
 use C4::Acquisitions;
+use C4::Biblio;
 
 my $input=new CGI;
 

delitem.pl

@@ -10,6 +10,7 @@ use C4::Search;
 use CGI;
 use C4::Output;
 use C4::Acquisitions;
+use C4::Biblio;
 
 my $input = new CGI;
 #print $input->header;

loadmodules.pl

@@ -5,6 +5,7 @@
 #called as an include by the acquisitions index page
 
 use C4::Acquisitions;
+use C4::Biblio;
 use C4::Search;
 use CGI;
 my $input=new CGI;

moditem.pl

@@ -10,6 +10,7 @@ use C4::Search;
 use CGI;
 use C4::Output;
 use C4::Acquisitions;
+use C4::Biblio;
 
 my $input = new CGI;
 my $submit=$input->param('delete.x');
@@ -28,7 +29,7 @@ my $item=itemnodata('blah','',$itemnum);
 #my ($analytictitle)=analytic($biblionumber,'t');
 #my ($analyticauthor)=analytic($biblionumber,'a');
 print startpage();
-print startmenu();
+print startmenu('catalogue');
 my %inputs;
 
 

orderbreakdown.pl

@@ -4,6 +4,7 @@
 #written by chris@katipo.co.nz 31/01/2000
 
 use C4::Acquisitions;
+use C4::Biblio;
 use C4::Output;
 use CGI;
 my $input=new CGI;

showbudget.pl

@@ -5,6 +5,7 @@
 #called as an include by the acquisitions index page
 
 use C4::Acquisitions;
+use C4::Biblio;
 #use CGI;
 #my $inp=new CGI;
 #print $inp->header;

updateitem.pl

@@ -4,6 +4,7 @@ use C4::Database;
 use CGI;
 use strict;
 use C4::Acquisitions;
+use C4::Biblio;
 use C4::Output;
 use C4::Circulation::Circ2;
 use C4::Accounts2;