From 0b0afd7485560cd651237ccc44f51c8f42f7bea3 Mon Sep 17 00:00:00 2001 From: Jason Boyer Date: Tue, 15 Sep 2020 16:14:38 -0400 Subject: [PATCH] LP1895660: Proxy.pm Proxy/Authen.pm Checking perms LOUD_NOISES for user 123 at location 321 So? I have changed these to use $logger->debug though they can maybe just be removed entirely? Signed-off-by: Jason Boyer Signed-off-by: Jane Sandberg Signed-off-by: Galen Charlton --- Open-ILS/src/perlmods/lib/OpenILS/WWW/Proxy.pm | 3 ++- Open-ILS/src/perlmods/lib/OpenILS/WWW/Proxy/Authen.pm | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/Proxy.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/Proxy.pm index ed6cdf9c53..74c460455f 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/Proxy.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/Proxy.pm @@ -10,6 +10,7 @@ use Digest::MD5 qw/md5_hex/; use OpenSRF::EX qw(:try); use OpenSRF::System; +use OpenSRF::Utils::Logger qw/$logger/; # set the bootstrap config and template include directory when @@ -125,7 +126,7 @@ sub handler { $ws_ou ||= $user->home_ou; - warn "Checking perms " . join(',', @$perms) . " for user " . $user->id . " at location $ws_ou\n"; + $logger->debug("Checking perms " . join(',', @$perms) . " for user " . $user->id . " at location $ws_ou\n"); my $failures = OpenSRF::AppSession ->create('open-ils.actor') diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/Proxy/Authen.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/Proxy/Authen.pm index 2366cfe07e..0cc9ec447d 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/Proxy/Authen.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/Proxy/Authen.pm @@ -12,6 +12,7 @@ use Digest::MD5 qw/md5_hex/; use OpenSRF::EX qw(:try); use OpenSRF::System; +use OpenSRF::Utils::Logger qw/$logger/; # set the bootstrap config when # this module is loaded @@ -87,7 +88,7 @@ sub handler { if ($user) { $ws_ou ||= $user->home_ou; - warn "Checking perms " . join(',', @$perms) . " for user " . $user->id . " at location $ws_ou\n"; + $logger->debug("Checking perms " . join(',', @$perms) . " for user " . $user->id . " at location $ws_ou\n"); my $failures = OpenSRF::AppSession ->create('open-ils.actor') -- 2.11.0