[open-ils-commits] r19479 - trunk/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ (erickson)

[svn at svn.open-ils.org]

Author: erickson
Date: 2011-02-18 09:35:05 -0500 (Fri, 18 Feb 2011)
New Revision: 19479

Modified:
   trunk/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Money.pm
Log:
allow users to see their own payments w/o perm

Modified: trunk/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Money.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Money.pm	2011-02-18 14:35:04 UTC (rev 19478)
+++ trunk/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Money.pm	2011-02-18 14:35:05 UTC (rev 19479)
@@ -534,9 +534,11 @@
                     mbt => ['usr']
                 }
             }
-        ]) or return OpenILS::Event->new('MP_NOT_FOUND');
+        ]) or return $e->event;
 
-        return $e->event unless $e->allowed('VIEW_TRANSACTION', $payment->xact->usr->home_ou); 
+        return $e->event unless 
+            $e->requestor->id == $payment->xact->usr->id or
+            $e->allowed('VIEW_TRANSACTION', $payment->xact->usr->home_ou); 
 
         push @$payments, $payment;
     }