[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