Index: openacs-4/packages/acs-lang/tcl/lang-util-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-util-procs.xql,v
diff -u -N -r1.8 -r1.8.8.1
--- openacs-4/packages/acs-lang/tcl/lang-util-procs.xql	17 Oct 2010 21:06:08 -0000	1.8
+++ openacs-4/packages/acs-lang/tcl/lang-util-procs.xql	13 Mar 2019 13:37:18 -0000	1.8.8.1
@@ -11,20 +11,6 @@
       </querytext>
    </fullquery>
 
-   <fullquery name="lang::util::default_locale_from_lang_not_cached.default_locale_from_lang">
-      <querytext>
-        select locale
-        from   ad_locales
-        where  language = '[db_quote $language]'
-        and    enabled_p = 't'
-        and    (default_p = 't' or
-                (select count(*)
-                from ad_locales
-                where language = '[db_quote $language]') = 1
-                    )
-      </querytext>
-   </fullquery>
-
    <fullquery name="lang::util::get_label.select">
       <querytext>
         select label