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 -r1.1 -r1.2
--- openacs-4/packages/acs-lang/tcl/lang-util-procs.xql	7 Oct 2002 14:32:46 -0000	1.1
+++ openacs-4/packages/acs-lang/tcl/lang-util-procs.xql	18 Aug 2003 08:04:26 -0000	1.2
@@ -11,12 +11,12 @@
       </querytext>
    </fullquery>
 
-   <fullquery name="lang::util::default_locale_from_lang.default_locale_from_lang">
+   <fullquery name="lang::util::default_locale_from_lang_not_cached.default_locale_from_lang">
       <querytext>
       
         select locale 
         from   ad_locales 
-        where  language = :language
+        where  language = '[db_quote $language]'
         and    default_p = 't'
     
       </querytext>