open-ils.actor.user.retrieve.parts -- default to logged in user when no id is provided

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm b/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
index b71f409..dca0ca9 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
@@ -2989,6 +2989,7 @@ sub user_retrieve_parts {
        my( $self, $client, $auth, $user_id, $fields ) = @_;
        my $e = new_editor(authtoken => $auth);
        return $e->event unless $e->checkauth;
+    $user_id ||= $e->requestor->id;
        if( $e->requestor->id != $user_id ) {
                return $e->event unless $e->allowed('VIEW_USER');
        }