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.1 -r1.1.4.1
--- openacs-4/packages/acs-lang/tcl/lang-util-procs-oracle.xql	7 Oct 2002 14:34:15 -0000	1.1
+++ openacs-4/packages/acs-lang/tcl/lang-util-procs-oracle.xql	31 May 2004 18:51:27 -0000	1.1.4.1
@@ -8,7 +8,7 @@
       
         select nls_language
         from   ad_locales 
-        where  language = :language
+	where  lower(trim(language)) = lower(:language)
         and    rownum = 1
     
       </querytext>
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.1 -r1.1.4.1
--- openacs-4/packages/acs-lang/tcl/lang-util-procs-postgresql.xql	7 Oct 2002 14:32:46 -0000	1.1
+++ openacs-4/packages/acs-lang/tcl/lang-util-procs-postgresql.xql	31 May 2004 18:51:27 -0000	1.1.4.1
@@ -8,7 +8,7 @@
       
         select nls_language
         from   ad_locales 
-        where  language = :language
+        where  lower(trim(language)) = lower(:language)
         limit  1
     
       </querytext>
Index: openacs-4/packages/acs-lang/tcl/locale-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/locale-procs.tcl,v
diff -u -r1.27 -r1.27.2.1
--- openacs-4/packages/acs-lang/tcl/locale-procs.tcl	5 Feb 2004 12:09:05 -0000	1.27
+++ openacs-4/packages/acs-lang/tcl/locale-procs.tcl	31 May 2004 18:51:27 -0000	1.27.2.1
@@ -803,6 +803,6 @@
     return [db_string select_locale_label {
         select label 
           from ad_locales
-         where locale = :locale
+         where lower(locale) = lower(:locale)
     }]
 }