From: erickson Date: Tue, 23 Dec 2008 18:06:02 +0000 (+0000) Subject: only fetch the user if needed for perm checking X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=7af50d3cec1b0638fd05678622e4c1f7995db23a;p=Evergreen.git only fetch the user if needed for perm checking git-svn-id: svn://svn.open-ils.org/ILS/trunk@11663 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 2d183ec6e3..45d29cf602 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm @@ -1845,9 +1845,9 @@ sub checked_out { my $e = new_editor(authtoken=>$auth); return $e->event unless $e->checkauth; - my $user = $e->retrieve_actor_user($userid) or return $e->event; if( $userid ne $e->requestor->id ) { + my $user = $e->retrieve_actor_user($userid) or return $e->event; unless($e->allowed('VIEW_CIRCULATIONS', $user->home_ou)) { # see if there is a friend link allowing circ.view perms