use a perm that actually exists
authorLebbeous Fogle-Weekley <lebbeous@esilibrary.com>
Mon, 20 Aug 2012 21:04:55 +0000 (17:04 -0400)
committerLebbeous Fogle-Weekley <lebbeous@esilibrary.com>
Fri, 21 Sep 2012 15:06:57 +0000 (11:06 -0400)
Signed-off-by: Lebbeous Fogle-Weekley <lebbeous@esilibrary.com>
Open-ILS/examples/fm_IDL.xml
Open-ILS/src/perlmods/lib/OpenILS/Application/URLVerify.pm

index d685b20..1c2b934 100644 (file)
@@ -9359,7 +9359,7 @@ SELECT  usr,
 
         <permacrud xmlns="http://open-ils.org/spec/opensrf/IDL/permacrud/v1">
             <actions>
-                <retrieve permission="VERIFY_URL" context_field="owning_lib"/>
+                <retrieve permission="URL_VERIFY" context_field="owning_lib"/>
             </actions>
         </permacrud>
 
index fbaf342..ecac93f 100644 (file)
@@ -63,7 +63,7 @@ sub validate_session {
 
     my $e = new_editor(authtoken => $auth, xact => 1);
     return $e->die_event unless $e->checkauth;
-    return $e->die_event unless $e->allowed('VERIFY_URL');
+    return $e->die_event unless $e->allowed('URL_VERIFY');
 
     my $session = $e->retrieve_url_verify_session($session_id)
         or return $e->die_event;
@@ -324,7 +324,7 @@ sub verify_url {
         collect_verify_attempt_and_settings($e, $attempt_id);
 
     return $e->event unless $e->allowed(
-        'VERIFY_URL', $attempt->session->owning_lib);
+        'URL_VERIFY', $attempt->session->owning_lib);
 
     my $cur_url = $url;
     my $loop_detected = 0;
@@ -615,7 +615,7 @@ sub create_session {
     return $e->die_event unless $e->checkauth;
 
     $owning_lib ||= $e->requestor->ws_ou;
-    return $e->die_event unless $e->allowed("VERIFY_URL", $owning_lib);
+    return $e->die_event unless $e->allowed("URL_VERIFY", $owning_lib);
 
     my $session = Fieldmapper::url_verify::session->new;
     $session->name($name);
@@ -742,7 +742,7 @@ sub session_perform_search {
     my $session = $e->retrieve_url_verify_session(int($ses_id));
 
     return $e->die_event unless
-        $session and $e->allowed("VERIFY_URL", $session->owning_lib);
+        $session and $e->allowed("URL_VERIFY", $session->owning_lib);
 
     if ($session->creator != $e->requestor->id) {
         $e->disconnect;