Lines 39-45
use Koha::DateUtils;
Link Here
|
39 |
|
39 |
|
40 |
#BZ 16357, add timestamps to warnings |
40 |
#BZ 16357, add timestamps to warnings |
41 |
use Log::Log4perl qw(:easy); |
41 |
use Log::Log4perl qw(:easy); |
42 |
Log::Log4perl->easy_init($WARN); |
42 |
Log::Log4perl->easy_init({ level => $WARN, utf8 => 1 }); |
43 |
my $logger = Log::Log4perl->get_logger(); # use the default logger style |
43 |
my $logger = Log::Log4perl->get_logger(); # use the default logger style |
44 |
$SIG{__WARN__} = sub { |
44 |
$SIG{__WARN__} = sub { |
45 |
my $message = shift; |
45 |
my $message = shift; |
46 |
- |
|
|