[open-ils-commits] r10762 - trunk/Open-ILS/src/perlmods/OpenILS/Application

[svn at svn.open-ils.org]

Author: erickson
Date: 2008-10-06 09:47:59 -0400 (Mon, 06 Oct 2008)
New Revision: 10762

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
Log:
default to requesting user on retrieval as well

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm	2008-10-06 13:46:20 UTC (rev 10761)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm	2008-10-06 13:47:59 UTC (rev 10762)
@@ -139,6 +139,7 @@
 
     my $e = new_editor(authtoken => $auth);
     return $e->event unless $e->checkauth;
+    $user_id = $e->requestor->id unless defined $user_id;
 
     my $patron = $e->retrieve_actor_user($user_id) or return $e->event;
     if($e->requestor->id != $user_id) {