More logging in Actor.pm

Signed-off-by: Terran McCanna <tmccanna@georgialibraries.org>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Actor.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Actor.pm
index b9b04a0..4b309d2 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Actor.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Actor.pm
@@ -1216,9 +1216,13 @@ sub _create_stat_maps {
 sub _create_perm_maps {
 
     my($e, $patron, $new_patron) = @_;
-
+#DEBUGGING
+$logger->error("E-RENEW: inside sub _create_perm_maps");
+$logger->error("E-RENEW: patron is $patron");
+$logger->error("E-RENEW: newpatron is $new_patron");
     my $maps = $patron->permissions;
-
+#DEBUGGING
+$logger->error("E-RENEW: perm maps: $maps");
     for my $map (@$maps) {
 
         my $method = "update_permission_usr_perm_map";
@@ -1230,7 +1234,7 @@ sub _create_perm_maps {
         }
 
         $map->usr($new_patron->id);
-
+$logger->error("E-RENEW: for each map - ". $map->usr);
         $logger->info( "Updating permissions with method $method and map $map" );
 
         $e->$method($map) or return (undef, $e->die_event);