From 23acd0a242f101dae353233b14a028d2a6f23143 Mon Sep 17 00:00:00 2001 From: erickson Date: Thu, 13 Jul 2006 20:27:02 +0000 Subject: [PATCH] fixed typo, added some sanity checks git-svn-id: svn://svn.open-ils.org/ILS/trunk@4977 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/Actor.pm | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm b/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm index 5fbede5adc..b4c1a38d2d 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm @@ -908,7 +908,7 @@ sub get_user_profiles { return $user_profiles = $apputils->simple_scalar_request( "open-ils.cstore", - "open-ils.cstore.direct.actor.profile.search.atomic", { id => { "!=" => undef }); + "open-ils.cstore.direct.actor.profile.search.atomic", { id => { "!=" => undef }}); } @@ -1649,7 +1649,7 @@ sub hold_request_count { $h->current_copy ); - if ($copy->status == 8) { + if ($copy and $copy->status == 8) { push @ready, $h; } } @@ -1947,12 +1947,6 @@ sub retrieve_groups_tree { } ] )->[0]; - -# my $groups = $apputils->simple_scalar_request( -# "open-ils.storage", -# "open-ils.storage.direct.permission.grp_tree.retrieve.all.atomic"); -# return $self->build_group_tree($groups); - } -- 2.11.0