View | Details | Raw Unified | Return to bug 14962
Collapse All | Expand All

(-)a/Koha/Displays.pm (-3 / +2 lines)
Lines 20-28 package Koha::Displays; Link Here
20
use Modern::Perl;
20
use Modern::Perl;
21
21
22
use Carp;
22
use Carp;
23
use DateTime;
24
23
25
use Koha::Database;
24
use Koha::Database;
25
use Koha::DateUtils qw( dt_from_string );
26
use Koha::Display;
26
use Koha::Display;
27
27
28
use base qw(Koha::Objects);
28
use base qw(Koha::Objects);
Lines 73-79 Returns displays that are currently active (enabled and within date range if spe Link Here
73
73
74
sub active {
74
sub active {
75
    my ($self) = @_;
75
    my ($self) = @_;
76
    my $today = DateTime->today->ymd;
76
    my $today = dt_from_string()->truncate( to => 'day' )->ymd;
77
77
78
    return $self->search(
78
    return $self->search(
79
        {
79
        {
80
- 

Return to bug 14962