fixed typo, added some sanity checks

git-svn-id: svn://svn.open-ils.org/ILS/trunk@4977 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm b/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
index 5fbede5..b4c1a38 100644 (file)
--- 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);        
-
 }