From 0aebf458ba2b2c0d5764cc966b48ce5eefc0c9f4 Mon Sep 17 00:00:00 2001 From: erickson Date: Tue, 5 Feb 2008 15:15:57 +0000 Subject: [PATCH] fixed some typos git-svn-id: svn://svn.open-ils.org/ILS/trunk@8632 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- .../perlmods/OpenILS/Application/AppUtils.pm | 36 +++++++++---------- 1 file changed, 18 insertions(+), 18 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm b/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm index 7f5716d0e9..c91d6f4b73 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm @@ -1383,7 +1383,7 @@ sub get_org_descendants { my($self, $org_id, $depth) = @_; $depth ||= 0; - my $org_list = OpenILS::Utils::CStoreEditor->new->json_query( + my $org_list = OpenILS::Utils::CStoreEditor->new->json_query({ select => { aou => [{ transform => 'actor.org_unit_descendants', @@ -1391,12 +1391,12 @@ sub get_org_descendants { result_field => 'id', params => [$depth] }], - from => 'aou', - where => {id => $org_id} - } - ); + }, + from => 'aou', + where => {id => $org_id} + }); my @orgs; - push(@orgs, $_->{id}) for $org_list; + push(@orgs, $_->{id}) for @$org_list; return \@orgs; } @@ -1404,7 +1404,7 @@ sub get_org_ancestors { my($self, $org_id, $depth) = @_; $depth ||= 0; - my $org_list = OpenILS::Utils::CStoreEditor->new->json_query( + my $org_list = OpenILS::Utils::CStoreEditor->new->json_query({ select => { aou => [{ transform => 'actor.org_unit_ancestors', @@ -1412,13 +1412,13 @@ sub get_org_ancestors { result_field => 'id', params => [$depth] }], - from => 'aou', - where => {id => $org_id} - } - ); + }, + from => 'aou', + where => {id => $org_id} + }); my @orgs; - push(@orgs, $_->{id}) for $org_list; + push(@orgs, $_->{id}) for @$org_list; return \@orgs; } @@ -1426,7 +1426,7 @@ sub get_org_full_path { my($self, $org_id, $depth) = @_; $depth ||= 0; - my $org_list = OpenILS::Utils::CStoreEditor->new->json_query( + my $org_list = OpenILS::Utils::CStoreEditor->new->json_query({ select => { aou => [{ transform => 'actor.org_unit_full_path', @@ -1434,13 +1434,13 @@ sub get_org_full_path { result_field => 'id', params => [$depth] }], - from => 'aou', - where => {id => $org_id} - } - ); + }, + from => 'aou', + where => {id => $org_id} + }); my @orgs; - push(@orgs, $_->{id}) for $org_list; + push(@orgs, $_->{id}) for @$org_list; return \@orgs; } -- 2.43.2