From c0577fbdf9ca077544107faceb9c30b4fc6cffa6 Mon Sep 17 00:00:00 2001 From: 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.5