typo
authorphasefx <phasefx@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 2 Jan 2009 20:30:29 +0000 (20:30 +0000)
committerphasefx <phasefx@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 2 Jan 2009 20:30:29 +0000 (20:30 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@11730 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Actor.pm

index 98400d4..e58eec7 100644 (file)
@@ -2739,7 +2739,7 @@ sub apply_penalty {
        my($self, $conn, $auth, $penalty) = @_;
        my $e = new_editor(authtoken=>$auth, xact => 1);
        return $e->die_event unless $e->checkauth;
-    my $user = $e->retrieve_actor_user(penalty->usr) or return $e->die_event;
+    my $user = $e->retrieve_actor_user($penalty->usr) or return $e->die_event;
     return $e->die_event unless $e->allowed('UPDATE_USER', $user->home_ou);
 
     # is it already applied?