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

[svn at svn.open-ils.org]

Author: erickson
Date: 2008-12-23 10:39:13 -0500 (Tue, 23 Dec 2008)
New Revision: 11659

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor/Friends.pm
Log:
fixed broken method call params

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor/Friends.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor/Friends.pm	2008-12-22 21:59:28 UTC (rev 11658)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor/Friends.pm	2008-12-23 15:39:13 UTC (rev 11659)
@@ -170,7 +170,7 @@
 # returns 1 if delegate_user is allowed to perform 'perm' for base_user
 sub friend_perm_allowed {
     my($self, $e, $base_user_id, $delegate_user_id, $perm) = @_;
-    return 0 unless $self->confirmed_friends($base_user_id, $delegate_user_id);
+    return 0 unless $self->confirmed_friends($e, $base_user_id, $delegate_user_id);
     $perm_check_query->{where} = {
         '+cubi' => {target_user => $delegate_user_id},
         '+cub' => {btype => "folks:$perm", owner => $base_user_id}