Lines 25-32
use strict;
Link Here
|
25 |
|
25 |
|
26 |
use C4::Context; |
26 |
use C4::Context; |
27 |
use C4::Branch qw(GetBranchesCount); |
27 |
use C4::Branch qw(GetBranchesCount); |
|
|
28 |
use Koha::DateUtils qw(dt_from_string); |
28 |
use Memoize; |
29 |
use Memoize; |
29 |
use DateTime; |
|
|
30 |
use DateTime::Format::MySQL; |
30 |
use DateTime::Format::MySQL; |
31 |
use autouse 'Data::Dumper' => qw(Dumper); |
31 |
use autouse 'Data::Dumper' => qw(Dumper); |
32 |
|
32 |
|
Lines 1478-1484
sub GetDailyQuote {
Link Here
|
1478 |
# update the timestamp for that quote |
1478 |
# update the timestamp for that quote |
1479 |
$query = 'UPDATE quotes SET timestamp = ? WHERE id = ?'; |
1479 |
$query = 'UPDATE quotes SET timestamp = ? WHERE id = ?'; |
1480 |
$sth = C4::Context->dbh->prepare($query); |
1480 |
$sth = C4::Context->dbh->prepare($query); |
1481 |
$sth->execute(DateTime::Format::MySQL->format_datetime(DateTime->now), $quote->{'id'}); |
1481 |
$sth->execute( |
|
|
1482 |
DateTime::Format::MySQL->format_datetime( dt_from_string() ), |
1483 |
$quote->{'id'} |
1484 |
); |
1482 |
} |
1485 |
} |
1483 |
return $quote; |
1486 |
return $quote; |
1484 |
} |
1487 |
} |
1485 |
- |
|
|