From c0577fbdf9ca077544107faceb9c30b4fc6cffa6 Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Tue, 18 Mar 2003 11:15:36 +0000
Subject: [PATCH] bugfixes

---
 modbibitem.pl | 18 ++++++++++++++++--
 updateitem.pl |  1 -
 2 files changed, 16 insertions(+), 3 deletions(-)

diff --git a/modbibitem.pl b/modbibitem.pl
index d72e348800..d6c16fa06e 100755
--- a/modbibitem.pl
+++ b/modbibitem.pl
@@ -26,6 +26,7 @@
 # Suite 330, Boston, MA  02111-1307 USA
 
 use strict;
+require Exporter;
 
 use C4::Search;
 use C4::Output;
@@ -33,6 +34,10 @@ use C4::Koha;
 use CGI;
 use HTML::Template;
 
+use C4::Biblio;
+use C4::Catalogue;
+use C4::Auth;
+use C4::Interface::CGI::Output;
 
 my $input = new CGI;
 my $bibitemnum=$input->param('bibitem');
@@ -43,7 +48,14 @@ if ($submit eq ''){
   print $input->redirect("deletebiblioitem.pl?biblioitemnumber=$bibitemnum&biblionumber=$biblio");
 }
 
-my $template = gettemplate("modbibitem.tmpl");
+my ($template, $loggedinuser, $cookie) = get_template_and_user({
+	template_name   => 'modbibitem.tmpl',
+	query           => $input,
+	type            => "intranet",
+	authnotrequired => 0,
+	flagsrequired   => {catalogue => 1},
+    });
+
 
 my %inputs;
 
@@ -85,7 +97,9 @@ $inputs{'bibitemnum'}="hidden\t$data->{'biblioitemnumber'}\t21";
 $template->param( biblionumber => $data->{'biblionumber'},
 								title => $data->{'title'},
 								author => $data->{'author'},
-								description => $data->{'description'});
+								description => $data->{'description'},
+								loggedinuser => $loggedinuser,
+								);
 
 my ($count,@bibitems)=bibitems($data->{'biblionumber'});
 
diff --git a/updateitem.pl b/updateitem.pl
index c280b1356b..48945fdb6b 100755
--- a/updateitem.pl
+++ b/updateitem.pl
@@ -22,7 +22,6 @@
 use strict;
 use CGI;
 use C4::Context;
-use C4::Acquisitions;
 use C4::Biblio;
 use C4::Output;
 use C4::Circulation::Circ2;
-- 
2.39.2