[Koha-cvs] koha/circ currenttransfers.pl [rel_3_0]

Antoine Farnault antoine at koha-fr.org
Thu Nov 23 12:27:34 CET 2006


CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	Antoine Farnault <toins>	06/11/23 11:27:34

Modified files:
	circ           : currenttransfers.pl 

Log message:
	add a call to a missed module & removing toto le bozzo ;-)

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/circ/currenttransfers.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.3.2.6&r2=1.3.2.7

Patches:
Index: currenttransfers.pl
===================================================================
RCS file: /sources/koha/koha/circ/currenttransfers.pl,v
retrieving revision 1.3.2.6
retrieving revision 1.3.2.7
diff -u -b -r1.3.2.6 -r1.3.2.7
--- currenttransfers.pl	23 Nov 2006 11:21:27 -0000	1.3.2.6
+++ currenttransfers.pl	23 Nov 2006 11:27:34 -0000	1.3.2.7
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: currenttransfers.pl,v 1.3.2.6 2006/11/23 11:21:27 toins Exp $
+# $Id: currenttransfers.pl,v 1.3.2.7 2006/11/23 11:27:34 toins Exp $
 
 # Copyright 2000-2002 Katipo Communications
 #
@@ -27,6 +27,7 @@
 use C4::Auth;
 use C4::Date;
 use C4::Circulation::Circ2;
+use C4::Interface::CGI::Output;
 use Date::Calc qw(
   Today
   Add_Delta_YM
@@ -99,7 +100,6 @@
             $getransf{'biblionumber'} = $gettitle->{'biblionumber'};
             $getransf{'itemnumber'}   = $gettitle->{'itemnumber'};
             $getransf{'barcode'}      = $gettitle->{'barcode'};
-            # 				$getransf{'barcode'} = 'toto le bozo';
             $getransf{'itemtype'}       = $itemtypeinfo->{'description'};
             $getransf{'homebranch'}     = $gettitle->{'homebranch'};
             $getransf{'holdingbranch'}  = $gettitle->{'holdingbranch'};





More information about the Koha-cvs mailing list