From: Jason Boyer <JBoyer@equinoxinitiative.org>
Date: Tue, 15 Sep 2020 20:14:38 +0000 (-0400)
Subject: LP1895660: Proxy.pm Proxy/Authen.pm
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=0b0afd7485560cd651237ccc44f51c8f42f7bea3;p=working%2FEvergreen.git

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 <JBoyer@equinoxinitiative.org>
Signed-off-by: Jane Sandberg <sandbej@linnbenton.edu>
Signed-off-by: Galen Charlton <gmc@equinoxOLI.org>
---

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')