Missed "use C4::Auth;" line required by checkauth routine...

acqui.simple/addbookslccn.pl

@@ -14,6 +14,7 @@
 # Add info on biblioitems and items already entered as you enter new ones
 
 use C4::Database;
+use C4::Auth;
 use CGI;
 use strict;
 use C4::Acquisitions;

acqui.simple/viewmarc.pl

@@ -9,6 +9,7 @@
 my $starttime=gettime();
 
 use C4::Database;
+use C4::Auth;
 use CGI;
 use strict;
 use C4::Acquisitions;

acqui/acquire.pl

@@ -4,6 +4,7 @@
 #written by chris@katipo.co.nz 24/2/2000
 
 use C4::Acquisitions;
+use C4::Auth;
 use C4::Biblio;
 use C4::Output;
 use C4::Database;

acqui/addorder.pl

@@ -4,6 +4,7 @@
 #written 29/2/00 by chris@katipo.co.nz
 
 use strict;
+use C4::Auth;
 use CGI;
 use C4::Output;
 use C4::Acquisitions;

acqui/basket.pl

@@ -4,6 +4,7 @@
 #written by chris@katipo.co.nz 24/2/2000
 
 use C4::Acquisitions;
+use C4::Auth;
 use C4::Biblio;
 use C4::Output;
 use CGI;

acqui/finishreceive.pl

@@ -4,6 +4,7 @@
 #written 1/3/00 by chris@katipo.co.nz
 
 use C4::Output;
+use C4::Auth;
 use C4::Acquisitions;
 use C4::Biblio;
 use CGI;

acqui/modorders.pl

@@ -4,6 +4,7 @@
 #written 29/2/00 by chris@katipo.co.nz
 
 use strict;
+use C4::Auth;
 use CGI;
 use C4::Output;
 use C4::Acquisitions;

acqui/newbasket.pl

@@ -4,6 +4,7 @@
 #written by chris@katipo.co.nz 24/2/2000
 
 use C4::Acquisitions;
+use C4::Auth;
 use C4::Biblio;
 use C4::Output;
 use CGI;

acqui/newbasket2.pl

@@ -3,6 +3,7 @@
 #now script to do searching for acquisitions
 
 use strict;
+use C4::Auth;
 use C4::Search;
 use CGI;
 use C4::Output;

acqui/newbiblio.pl

@@ -4,6 +4,7 @@
 #written by chris@katipo.co.nz 24/2/2000
 
 use C4::Acquisitions;
+use C4::Auth;
 use C4::Biblio;
 use C4::Output;
 use C4::Search;

acqui/order.pl

@@ -4,6 +4,7 @@
 #written by chris@katipo.co.nz 23/2/2000
 
 use C4::Acquisitions;
+use C4::Auth;
 use C4::Biblio;
 use C4::Output;
 use CGI;

acqui/receive.pl

@@ -4,6 +4,7 @@
 #written by chris@katipo.co.nz 24/2/2000
 
 use C4::Acquisitions;
+use C4::Auth;
 use C4::Biblio;
 use C4::Output;
 use CGI;

acqui/recieveorder.pl

@@ -4,6 +4,7 @@
 #written by chris@katipo.co.nz 24/2/2000
 
 use C4::Acquisitions;
+use C4::Auth;
 use C4::Biblio;
 use C4::Output;
 use CGI;

acqui/supplier.pl

@@ -4,6 +4,7 @@
 #written by chris@katipo.co.nz 24/2/2000
 
 use C4::Acquisitions;
+use C4::Auth;
 use C4::Biblio;
 use C4::Output;
 use CGI;

acqui/updatesupplier.pl

@@ -4,6 +4,7 @@
 #written by chris@katipo.co.nz 23/2/2000
 
 use C4::Acquisitions;
+use C4::Auth;
 use C4::Biblio;
 use C4::Output;
 use CGI;

admin/aqbookfund.pl

@@ -20,6 +20,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

admin/aqbudget.pl

@@ -20,6 +20,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

admin/branches.pl

@@ -20,6 +20,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

admin/categorie.pl

@@ -19,6 +19,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

admin/categoryitem.pl

@@ -20,6 +20,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

admin/currency.pl

@@ -20,6 +20,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

admin/itemtypes.pl

@@ -20,6 +20,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

admin/itemtypesearchgroups.pl

@@ -20,6 +20,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

admin/printers.pl

@@ -20,6 +20,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

admin/stopwords.pl

@@ -20,6 +20,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

admin/systempreferences.pl

@@ -20,6 +20,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

admin/z3950servers.pl

@@ -20,6 +20,7 @@
 #	- we delete the record having primkey=$primkey
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

bookcount.pl

@@ -24,6 +24,7 @@
 # Suite 330, Boston, MA  02111-1307 USA
 
 use strict;
+use C4::Auth;
 use CGI;
 use C4::Context;
 use C4::Search;

circ/selectbranchprinter.pl

@@ -19,6 +19,7 @@
 # Suite 330, Boston, MA  02111-1307 USA
 
 use strict;
+use C4::Auth;
 use CGI qw/:standard/;
 use C4::Circulation::Circ2;
 use C4::Output;

currency.pl

@@ -28,6 +28,7 @@
 # to be used. Is it obsolete?
 
 use CGI;
+use C4::Auth;
 use C4::Acquisitions;
 use C4::Biblio;
 

groups.pl

@@ -24,6 +24,7 @@
 # Suite 330, Boston, MA  02111-1307 USA
 
 use CGI qw/:standard/;
+use C4::Auth;
 use C4::Output;
 use C4::Groups;
 use C4::Circulation::Circ2;

jmemberentry.pl

@@ -4,6 +4,7 @@
 #written 20/12/99 by chris@katipo.co.nz
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

logout.pl

@@ -1,6 +1,7 @@
 #!/usr/bin/perl
 
 use CGI;
+use C4::Auth;
 use C4::Database;
 use C4::Output;
 

maint/catmaintain.pl

@@ -5,6 +5,7 @@
 # by chris@katipo.co.nz
 
 use strict;
+use C4::Auth;
 use CGI;
 use C4::Output;
 use C4::Database;

maint/shiftbib.pl

@@ -5,6 +5,7 @@
 # by chris@katipo.co.nz
 
 use strict;
+use C4::Auth;
 use CGI;
 use C4::Output;
 use C4::Database;

mancredit.pl

@@ -4,6 +4,7 @@
 #script to display borrowers account details
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

maninvoice.pl

@@ -4,6 +4,7 @@
 #script to display borrowers account details
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

marc/viewmarc.pl

@@ -9,6 +9,7 @@
 my $starttime=gettime();
 
 use C4::Database;
+use C4::Auth;
 use CGI;
 use strict;
 use C4::Acquisitions;

modrequest.pl

@@ -5,6 +5,7 @@
 #last update 27/1/2000 by chris@katipo.co.nz
 
 use strict;
+use C4::Auth;
 #use DBI;
 use C4::Search;
 use CGI;

orderbreakdown.pl

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

overdue.pl

@@ -1,6 +1,7 @@
 #!/usr/bin/perl
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Database;

pay.pl

@@ -4,6 +4,7 @@
 #part of the koha library system, script to facilitate paying off fines
 
 use strict;
+use C4::Auth;
 use C4::Output;
 use CGI;
 use C4::Search;

placerequest.pl

@@ -4,6 +4,7 @@
 #writen 2/1/00 by chris@katipo.oc.nz
 
 use strict;
+use C4::Auth;
 #use DBI;
 use C4::Search;
 use CGI;

renewscript.pl

@@ -4,6 +4,7 @@
 #script to renew items from the web
 
 use CGI;
+use C4::Auth;
 use C4::Circulation::Renewals2;
 #get input
 my $input= new CGI;

reports.pl

@@ -4,6 +4,7 @@
 #written 8/11/99
 
 use strict;
+use C4::Auth;
 use CGI;
 use C4::Output;
 use C4::Stats;

reservereport.pl

@@ -4,6 +4,7 @@
 #script to display reports
 
 use C4::Stats;
+use C4::Auth;
 use strict;
 use Date::Manip;
 use CGI;

sec/writeoff.pl

@@ -4,6 +4,7 @@
 #script to write off accounts
 
 use strict;
+use C4::Auth;
 use CGI;
 use C4::Database;
 use C4::Stats;

showbudget.pl

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

simpleredirect.pl

@@ -4,6 +4,7 @@
 #used by members section
 
 use CGI;
+use C4::Auth;
 use strict;
 
 my $input=new CGI;

stats.pl

@@ -4,6 +4,7 @@
 #script to display reports
 
 use C4::Stats;
+use C4::Auth;
 use strict;
 use Date::Manip;
 use CGI;

stats2.pl

@@ -4,6 +4,7 @@
 #script to display reports
 
 use C4::Stats;
+use C4::Auth;
 use strict;
 use Date::Manip;
 use CGI;

subjectsearch.pl

@@ -4,6 +4,7 @@
 #written 8/11/99
 
 use strict;
+use C4::Auth;
 #use DBI;
 use C4::Search;
 use CGI;

tidyaccounts.pl

@@ -4,6 +4,7 @@
 #
 
 use strict;
+use C4::Auth;
 use C4::Database;
 use CGI;
 use C4::Accounts2;