From f8ab6ce6812afa33e6d3e6fa8f93d036be366f7e Mon Sep 17 00:00:00 2001 From: Liz Rea Date: Thu, 31 Jan 2013 14:53:29 +1300 Subject: [PATCH] Bug 8682 - Renewals do not appear on quick slips To test: Issue two books to a patron. Do a renewal on one of them. update the issuedate on the item that has been renewed to something before today (renewals on the same day will work even without this patch) I did: select * from issues; update issues set issuedate="2013-01-25 14:00:00" where itemnumber = 948; (itemnumber is variable depending on your test data.) Print a quick slip before the patch - the renewal will not show up as one of today's issues. Print a quick slip after the patch - the renewal will show up as one of today's issues. If you need reasoning as to why a renewal should show up on the quick slip, think of it as a record of everything a borrower did today, without the hassle of overdues. --- C4/Members.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/Members.pm b/C4/Members.pm index f1136c2..a4aeacc 100644 --- a/C4/Members.pm +++ b/C4/Members.pm @@ -2356,7 +2356,7 @@ sub IssueSlip { my $issueslist = GetPendingIssues($borrowernumber); foreach my $it (@$issueslist){ - if ((substr $it->{'issuedate'}, 0, 10) eq $now) { + if ((substr $it->{'issuedate'}, 0, 10) eq $now || (substr $it->{'lastreneweddate'}, 0, 10) eq $now) { $it->{'now'} = 1; } elsif ((substr $it->{'date_due'}, 0, 10) le $now) { -- 1.7.9.5