From 6c34b35f2544fefa1bfc4cb3280dfeb0c6ddc6be Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Wed, 9 Feb 2011 13:13:22 -0500 Subject: [PATCH] allow users to see their own payments w/o perm --- Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Money.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Money.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Money.pm index 66de1abc0d..3da2634852 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Money.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ/Money.pm @@ -532,9 +532,11 @@ sub format_payment_receipt { 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; } -- 2.11.0