From e6b77de505e32e1becb5c4c1d258f006a85c0814 Mon Sep 17 00:00:00 2001 From: Marcel de Rooy <m.de.rooy@rijksmuseum.nl> Date: Fri, 26 Aug 2022 09:28:14 +0000 Subject: [PATCH] Bug 31468: Change interface in Koha::Logger Test plan: Add a line in mainpage.pl: require Koha::Logger; Koha::Logger->get->warn("intranet L51"); Restart. Hit intranet mainpage. Verify that line is in plack=intranet. Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl> Retested with L49 now ;) Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com> --- Koha/Logger.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Koha/Logger.pm b/Koha/Logger.pm index f91e5a2277..bd1094c24b 100644 --- a/Koha/Logger.pm +++ b/Koha/Logger.pm @@ -57,7 +57,7 @@ sub get { my ( $class, $params ) = @_; my $interface = $params ? ( $params->{interface} || C4::Context->interface ) : C4::Context->interface; my $category = $params ? ( $params->{category} || caller ) : caller; - my $l4pcat = $interface . '.' . $category; + my $l4pcat = ( C4::Context->psgi_env ? 'plack-' : q{} ) . $interface . '.' . $category; my $init = _init(); my $self = {}; -- 2.20.1