From b29067886f535ac70f3b7b43d17ef2131a7a4def Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Tue, 18 Mar 2003 09:52:30 +0000
Subject: [PATCH] bugfixes (use Acquisition.pm removed and image templating
 fixed)

---
 .../intranet-tmpl/default/en/moditem.tmpl     |  3 +--
 moditem.pl                                    | 20 ++++++++++++-------
 moredetail.pl                                 |  4 ++--
 3 files changed, 16 insertions(+), 11 deletions(-)

diff --git a/koha-tmpl/intranet-tmpl/default/en/moditem.tmpl b/koha-tmpl/intranet-tmpl/default/en/moditem.tmpl
index 0d507126b0..aa14ad672f 100644
--- a/koha-tmpl/intranet-tmpl/default/en/moditem.tmpl
+++ b/koha-tmpl/intranet-tmpl/default/en/moditem.tmpl
@@ -37,8 +37,7 @@ No
 <input type=hidden name=itemnumber value="<TMPL_VAR Name="itemnumber">">
 <tr valign=top bgcolor=white><td></td><td>
 
-<input type=image  name=submit src=/images/save-changes.gif border=0 width=187
-height=42></td></tr>
+<input type=image  name=submit src=<TMPL_VAR name="interface">/<TMPL_VAR name="theme">/images/filesave.png border=0></td></tr>
 </table>
 </form></td></tr>
 </table>
diff --git a/moditem.pl b/moditem.pl
index c2d1564f42..46c0e34986 100755
--- a/moditem.pl
+++ b/moditem.pl
@@ -26,13 +26,18 @@
 # Suite 330, Boston, MA  02111-1307 USA
 
 use strict;
+require Exporter;
 
 use C4::Search;
 use CGI;
 use C4::Output;
-use C4::Acquisitions;
+#use C4::Acquisitions;
 use C4::Biblio;
 use HTML::Template;
+use C4::Koha;
+use C4::Catalogue;
+use C4::Auth;
+use C4::Interface::CGI::Output;
 
 my $input = new CGI;
 my $submit=$input->param('delete.x');
@@ -42,9 +47,6 @@ if ($submit ne ''){
   print $input->redirect("/cgi-bin/koha/delitem.pl?itemnum=$itemnum&bibitemnum=$bibitemnum");
 }
 
-#print $input->header;
-#print $input->dump;
-
 my $data=bibitemdata($bibitemnum);
 
 my $item=itemnodata('blah','',$itemnum);
@@ -52,9 +54,13 @@ my $item=itemnodata('blah','',$itemnum);
 #my ($analyticauthor)=analytic($biblionumber,'a');
 
 
-#print startpage();
-#print startmenu('catalogue');
-my $template=gettemplate("moditem.tmpl");
+my ($template, $loggedinuser, $cookie) = get_template_and_user({
+	template_name   => 'moditem.tmpl',
+	query           => $input,
+	type            => "intranet",
+	authnotrequired => 0,
+	flagsrequired   => {catalogue => 1},
+    });
 
 my %inputs;
 
diff --git a/moredetail.pl b/moredetail.pl
index c89db96538..3eb64b9e90 100755
--- a/moredetail.pl
+++ b/moredetail.pl
@@ -30,7 +30,7 @@ use C4::Catalogue;
 use C4::Output; # contains gettemplate
 use C4::Auth;
 use C4::Interface::CGI::Output;
-  
+
 my $query=new CGI;
 
 # FIXME  subject is not exported to the template?
@@ -46,7 +46,7 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user({
 	flagsrequired   => {catalogue => 1},
     });
 
-# get variables 
+# get variables
 
 my $biblionumber=$query->param('bib');
 my $title=$query->param('title');
-- 
2.20.1