[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha overdue.pl
From: |
Antoine Farnault |
Subject: |
[Koha-cvs] koha overdue.pl |
Date: |
Wed, 12 Jul 2006 16:43:46 +0000 |
CVSROOT: /sources/koha
Module name: koha
Changes by: Antoine Farnault <toins> 06/07/12 16:43:46
Modified files:
. : overdue.pl
Log message:
sync with rel_2_2
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/overdue.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.9.2.11&r2=1.9.2.11.2.1
Patches:
Index: overdue.pl
===================================================================
RCS file: /sources/koha/koha/Attic/overdue.pl,v
retrieving revision 1.9.2.11
retrieving revision 1.9.2.11.2.1
diff -u -b -r1.9.2.11 -r1.9.2.11.2.1
--- overdue.pl 4 Apr 2006 13:13:47 -0000 1.9.2.11
+++ overdue.pl 11 Jul 2006 14:18:26 -0000 1.9.2.11.2.1
@@ -1,6 +1,6 @@
#!/usr/bin/perl
-# $Id: overdue.pl,v 1.9.2.11 2006/04/04 13:13:47 tipaul Exp $
+# $Id: overdue.pl,v 1.9.2.11.2.1 2006/07/11 14:18:26 kados Exp $
# Copyright 2000-2002 Katipo Communications
#
@@ -121,7 +121,7 @@
$bornamefilter =~s/\*/\%/g;
$bornamefilter =~s/\?/\_/g;
-my $strsth="select date_due,concat(surname,' ', firstname) as borrower,
borrowers.phone, borrowers.emailaddress,issues.itemnumber, biblio.title,
biblio.author from issues
+my $strsth="select date_due,concat(surname,' ', firstname) as borrower,
borrowers.phone, borrowers.emailaddress,issues.itemnumber, biblio.title,
biblio.author,borrowers.borrowernumber from issues
LEFT JOIN borrowers ON issues.borrowernumber=borrowers.borrowernumber
LEFT JOIN items ON issues.itemnumber=items.itemnumber
LEFT JOIN biblioitems ON biblioitems.biblioitemnumber=items.biblioitemnumber
@@ -159,7 +159,7 @@
$title=$data->{'title'};
$author=$data->{'author'};
push (@overduedata, { duedate => $duedate,
- bornum => $bornum,
+ bornum => $data->{borrowernumber},
itemnum => $itemnum,
name => $name,
phone => $phone,
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha overdue.pl,
Antoine Farnault <=