Index: openacs-4/packages/acs-authentication/tcl/authority-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authority-procs.tcl,v
diff -u -N -r1.35 -r1.36
--- openacs-4/packages/acs-authentication/tcl/authority-procs.tcl	25 Jul 2018 18:27:52 -0000	1.35
+++ openacs-4/packages/acs-authentication/tcl/authority-procs.tcl	4 Oct 2018 10:07:02 -0000	1.36
@@ -553,8 +553,13 @@
 } {
     Get authority_id by short_name. Not cached.
 } {
-    return [db_string select_authority_id {} -default {}]
+    return [db_string select_authority_id {
+        select authority_id 
+        from   auth_authorities 
+        where  short_name = :short_name
+    } -default {}]
 }
+
 ad_proc -public auth::authority::local {} {
     Returns the authority_id of the local authority.
 } {
Index: openacs-4/packages/acs-authentication/tcl/authority-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authority-procs.xql,v
diff -u -N -r1.6 -r1.7
--- openacs-4/packages/acs-authentication/tcl/authority-procs.xql	12 Mar 2004 18:48:45 -0000	1.6
+++ openacs-4/packages/acs-authentication/tcl/authority-procs.xql	4 Oct 2018 10:07:02 -0000	1.7
@@ -20,12 +20,5 @@
       </querytext>
   </fullquery>
 
-  <fullquery name="auth::authority::get_id_not_cached.select_authority_id">
-      <querytext>
-          select authority_id 
-          from   auth_authorities 
-          where  short_name = :short_name 
-      </querytext>
-  </fullquery>
 
 </queryset>