[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/C4 Reserves.pm
From: |
Henri-Damien LAURENT |
Subject: |
[Koha-cvs] koha/C4 Reserves.pm |
Date: |
Thu, 12 Jul 2007 12:51:34 +0000 |
CVSROOT: /cvsroot/koha
Module name: koha
Changes by: Henri-Damien LAURENT <hdl> 07/07/12 12:51:34
Modified files:
C4 : Reserves.pm
Log message:
Bug Fixing : Deleting an unused variable
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Reserves.pm?cvsroot=koha&r1=1.14&r2=1.15
Patches:
Index: Reserves.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Reserves.pm,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -b -r1.14 -r1.15
--- Reserves.pm 12 Jul 2007 12:47:19 -0000 1.14
+++ Reserves.pm 12 Jul 2007 12:51:34 -0000 1.15
@@ -20,7 +20,7 @@
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
# Suite 330, Boston, MA 02111-1307 USA
-# $Id: Reserves.pm,v 1.14 2007/07/12 12:47:19 hdl Exp $
+# $Id: Reserves.pm,v 1.15 2007/07/12 12:51:34 hdl Exp $
use strict;
require Exporter;
@@ -33,7 +33,7 @@
my $library_name = C4::Context->preference("LibraryName");
# set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.14 $' =~ /\d+/g; shift(@v) . "." . join(
"_", map { sprintf "%03d", $_ } @v ); };
+$VERSION = do { my @v = '$Revision: 1.15 $' =~ /\d+/g; shift(@v) . "." . join(
"_", map { sprintf "%03d", $_ } @v ); };
=head1 NAME
@@ -286,7 +286,6 @@
");
$sth->execute($borrowernumber);
}
- my @borrowerreserv;
my $data = $sth->fetchall_arrayref({});
return @$data;
}