From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 1 Feb 2008 20:20:54 +0000 (+0000)
Subject: svn merge -r8574:8575 - removed :funcs import
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=8051d76e2a0f79f8dead1a61881fe9f9959b8f75;p=Evergreen.git

svn merge -r8574:8575 - removed :funcs import

git-svn-id: svn://svn.open-ils.org/ILS/branches/acq-experiment@8576 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm b/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm
index bbfc6e06ef..fe0314d1ad 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm
@@ -9,7 +9,7 @@ use OpenILS::Utils::ModsParser;
 use OpenSRF::EX qw(:try);
 use OpenILS::Event;
 use Data::Dumper;
-use OpenILS::Utils::CStoreEditor qw/:funcs/;
+use OpenILS::Utils::CStoreEditor;
 use OpenILS::Const qw/:const/;
 
 # ---------------------------------------------------------------------------
@@ -64,7 +64,7 @@ sub check_user_perms {
 	for my $type (@perm_types) {
 	    $PERM_QUERY->{select}->{au}->[0]->{params} = [$type, $org_id];
 		$PERM_QUERY->{where}->{id} = $user_id;
-		return $type unless $self->is_true(new_editor()->json_query($PERM_QUERY)->[0]->{has_perm});
+		return $type unless $self->is_true(OpenILS::Utils::CStoreEditor->new->json_query($PERM_QUERY)->[0]->{has_perm});
 	}
 	return undef;
 }