[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/circ branchreserves.pl [rel_3_0]
From: |
paul poulain |
Subject: |
[Koha-cvs] koha/circ branchreserves.pl [rel_3_0] |
Date: |
Thu, 25 Jan 2007 17:36:26 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_3_0
Changes by: paul poulain <tipaul> 07/01/25 17:36:26
Modified files:
circ : branchreserves.pl
Log message:
skip when waitingdate='0000-00-00'
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/circ/branchreserves.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.2.2.11&r2=1.2.2.12
Patches:
Index: branchreserves.pl
===================================================================
RCS file: /sources/koha/koha/circ/branchreserves.pl,v
retrieving revision 1.2.2.11
retrieving revision 1.2.2.12
diff -u -b -r1.2.2.11 -r1.2.2.12
--- branchreserves.pl 14 Dec 2006 15:41:54 -0000 1.2.2.11
+++ branchreserves.pl 25 Jan 2007 17:36:26 -0000 1.2.2.12
@@ -1,6 +1,6 @@
#!/usr/bin/perl
-# $Id: branchreserves.pl,v 1.2.2.11 2006/12/14 15:41:54 toins Exp $
+# $Id: branchreserves.pl,v 1.2.2.12 2007/01/25 17:36:26 tipaul Exp $
# Copyright 2000-2002 Katipo Communications
#
@@ -119,7 +119,7 @@
my $itemtypeinfo = getitemtypeinfo( $gettitle->{'itemtype'} );
$getreserv{'waitingdate'} = format_date( $num->{'waitingdate'} );
- next unless $num->{'waitingdate'};
+ next unless $num->{'waitingdate'} ne '0000-00-00';
my ( $waiting_year, $waiting_month, $waiting_day ) = split /-/,
$num->{'waitingdate'};
( $waiting_year, $waiting_month, $waiting_day ) =
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/circ branchreserves.pl [rel_3_0],
paul poulain <=