From ee56e731abbb6c5110d18acb568dd65263833ffb Mon Sep 17 00:00:00 2001 From: Chris Cormack Date: Sun, 30 Sep 2007 20:43:07 -0500 Subject: [PATCH] Fix for bug 1436, changing to use issuedate, not timestamp for sorting issues Signed-off-by: Chris Cormack --- C4/Members.pm | 2 +- circ/circulation.pl | 6 +----- 2 files changed, 2 insertions(+), 6 deletions(-) diff --git a/C4/Members.pm b/C4/Members.pm index 5616c21020..4f3d692547 100644 --- a/C4/Members.pm +++ b/C4/Members.pm @@ -952,7 +952,7 @@ sub GetPendingIssues { WHERE borrowernumber=? AND returndate IS NULL - ORDER BY issues.date_due" + ORDER BY issues.issuedate" ); $sth->execute($borrowernumber); my $data = $sth->fetchall_arrayref({}); diff --git a/circ/circulation.pl b/circ/circulation.pl index 0a92e686ca..4717038d32 100755 --- a/circ/circulation.pl +++ b/circ/circulation.pl @@ -403,13 +403,9 @@ if ($borrower) { # split in 2 arrays for today & previous my $dbh = C4::Context->dbh; foreach my $it ( @$issueslist ) { - my $issuedate = $it->{'timestamp'}; + my $issuedate = $it->{'issuedate'}; $issuedate =~ s/-//g; $issuedate = substr( $issuedate, 0, 8 ); - - # to let perl sort this correctly - $it->{'timestamp'} =~ s/(-|\:| )//g; - if ( $todaysdate == $issuedate ) { ( $it->{'charge'}, -- 2.39.5