Revert "Bug 7785: Remove unused function columns() which uses a MySQLism."
[koha_gimpoz] / C4 / Members.pm
index 434a018..6161ac9 100644 (file)
@@ -642,7 +642,7 @@ sub IsMemberBlocked {
         "SELECT COUNT(*) as latedocs
          FROM issues
          WHERE borrowernumber = ?
-         AND date_due < curdate()"
+         AND date_due < now()"
     );
     $sth->execute($borrowernumber);
     my $latedocs = $sth->fetchrow_hashref->{'latedocs'};
@@ -680,7 +680,7 @@ sub GetMemberIssuesAndFines {
     $sth = $dbh->prepare(
         "SELECT COUNT(*) FROM issues 
          WHERE borrowernumber = ? 
-         AND date_due < curdate()"
+         AND date_due < now()"
     );
     $sth->execute($borrowernumber);
     my $overdue_count = $sth->fetchrow_arrayref->[0];
@@ -1039,7 +1039,7 @@ sub GetPendingIssues {
     my $today = DateTime->now( time_zone => $tz);
     foreach (@{$data}) {
         if ($_->{issuedate}) {
-            $_->{issuedate} = dt_from_string($_->{issuedate}. 'sql');
+            $_->{issuedate} = dt_from_string($_->{issuedate}, 'sql');
         }
         $_->{date_due} or next;
         $_->{date_due} = DateTime::Format::DateParse->parse_datetime($_->{date_due}, $tz->name());