Index: openacs-4/packages/acs-lang/tcl/lang-util-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-util-procs-oracle.xql,v
diff -u -r1.2 -r1.2.8.1
--- openacs-4/packages/acs-lang/tcl/lang-util-procs-oracle.xql	29 Jun 2004 10:17:40 -0000	1.2
+++ openacs-4/packages/acs-lang/tcl/lang-util-procs-oracle.xql	2 Apr 2008 15:47:41 -0000	1.2.8.1
@@ -8,8 +8,9 @@
       
         select nls_language
         from   ad_locales 
-	where  lower(trim(language)) = lower(:language)
-        and    rownum = 1
+        where  lower(trim(language)) = lower(:language)
+          and  enabled_p = 't'
+          and  rownum = 1
     
       </querytext>
    </fullquery>
Index: openacs-4/packages/acs-lang/tcl/lang-util-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-util-procs-postgresql.xql,v
diff -u -r1.2 -r1.2.8.1
--- openacs-4/packages/acs-lang/tcl/lang-util-procs-postgresql.xql	29 Jun 2004 10:17:40 -0000	1.2
+++ openacs-4/packages/acs-lang/tcl/lang-util-procs-postgresql.xql	2 Apr 2008 15:47:41 -0000	1.2.8.1
@@ -9,6 +9,7 @@
         select nls_language
         from   ad_locales 
         where  lower(trim(language)) = lower(:language)
+          and  enabled_p = 't'
         limit  1
     
       </querytext>