From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 17 Aug 2007 21:02:46 +0000 (+0000)
Subject: debugging
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=c7001ebc59feba0bf9841dd1810d8483a3a387a9;p=Evergreen.git

debugging

git-svn-id: svn://svn.open-ils.org/ILS/trunk@7703 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/perlmods/OpenILS/WWW/Proxy.pm b/Open-ILS/src/perlmods/OpenILS/WWW/Proxy.pm
index 8d4fc45b9e..31d7740fb3 100644
--- a/Open-ILS/src/perlmods/OpenILS/WWW/Proxy.pm
+++ b/Open-ILS/src/perlmods/OpenILS/WWW/Proxy.pm
@@ -108,6 +108,8 @@ sub handler {
 
 	$ws_ou ||= $user->home_ou;
 
+	warn "Checking perms " . join(',', @$perms) . " for user " . $user->id . " at location $ws_ou\n";
+
 	my $failures = OpenSRF::AppSession
 		->create('open-ils.actor')
 		->request('open-ils.actor.user.perm.check', $auth_ses, $user->id, $ws_ou, $perms)