From 5967964496d39798d81e1e141ecb5d485c4dfe1b Mon Sep 17 00:00:00 2001 From: miker Date: Thu, 13 Jul 2006 20:16:00 +0000 Subject: [PATCH] minor fixes git-svn-id: svn://svn.open-ils.org/ILS/trunk@4976 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Actor.pm | 2 +- Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm b/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm index c094fffc48..5fbede5adc 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm @@ -1193,7 +1193,7 @@ sub check_user_perms { return $evt if $evt; if($staff->id ne $user_id) { - if( my $evt = $apputils->check_perms( + if( $evt = $apputils->check_perms( $staff->id, $org_id, 'VIEW_PERMISSION') ) { return $evt; } diff --git a/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm b/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm index a90e2a04a8..171e864585 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm @@ -893,7 +893,7 @@ sub fetch_open_transit_by_copy { my( $self, $copyid ) = @_; my($transit, $evt); $transit = $self->cstorereq( - 'open-ils.cstore.direct.action.transit_copy.search_where', + 'open-ils.cstore.direct.action.transit_copy.search', { target_copy => $copyid, dest_recv_time => undef }); $evt = OpenILS::Event->new('ACTION_TRANSIT_COPY_NOT_FOUND') unless $transit; return ($transit, $evt); -- 2.11.0