LP2006749: Fix second call to ou_ancestor_setting_perm_check in AppUtils.pm

Signed-off-by: Chris Sharp <csharp@georgialibraries.org>
Signed-off-by: Jason Stephenson <jason@sigio.com>
Signed-off-by: Galen Charlton <gmc@equinoxOLI.org>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
index 441d0c0..24b7fdb 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/AppUtils.pm
@@ -1356,11 +1356,10 @@ sub ou_ancestor_setting_log {
         $coust = $e->retrieve_config_org_unit_setting_type([
             $name, {flesh => 1, flesh_fields => {coust => ['view_perm']}}
         ]);
-        my $orgs = $self->get_org_ancestors($orgid);
 
         my $qorg = $self->ou_ancestor_setting_perm_check(
-            $orgs,
-            $coust,
+            $orgid,
+            $coust->view_perm->code,
             $e,
             $auth
         );