@@ -, +, @@ ... Initiating an anonymous session... at /usr/share/koha/lib/C4/Auth.pm line 1294. Checking Auth at /usr/share/koha/lib/C4/Auth.pm line 815. ... 2018/02/11 08:56:29 Initiating an anonymous session... at /usr/share/koha/lib/C4/Auth.pm line 1294. 2018/02/11 08:56:33 Checking Auth at /usr/share/koha/lib/C4/Auth.pm line 815. --- debian/templates/plack.psgi | 9 +++++++++ misc/plack/koha.psgi | 9 +++++++++ 2 files changed, 18 insertions(+) --- a/debian/templates/plack.psgi +++ a/debian/templates/plack.psgi @@ -37,6 +37,15 @@ use Koha::Cache::Memory::Lite; use Koha::Database; use Koha::DateUtils; +#BZ 16520, add timestamps to warnings +use Log::Log4perl qw(:easy); +Log::Log4perl->easy_init($WARN); +my $logger = Log::Log4perl->get_logger(); # use the default logger style +$SIG{__WARN__} = sub { + my $message = shift; + $logger->warn($message); +}; + use CGI qw(-utf8 ); # we will loose -utf8 under plack, otherwise { no warnings 'redefine'; --- a/misc/plack/koha.psgi +++ a/misc/plack/koha.psgi @@ -5,6 +5,15 @@ use lib qw( ./lib ); use Plack::Middleware::Debug; use Plack::App::Directory; +#BZ 16520, add timestamps to warnings +use Log::Log4perl qw(:easy); +Log::Log4perl->easy_init($WARN); +my $logger = Log::Log4perl->get_logger(); # use the default logger style +$SIG{__WARN__} = sub { + my $message = shift; + $logger->warn($message); +}; + use CGI qw(-utf8 ); # we will lose -utf8 under plack { no warnings 'redefine'; --