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.3 -r1.4
--- openacs-4/packages/acs-lang/tcl/lang-util-procs.xql	21 Aug 2003 08:45:26 -0000	1.3
+++ openacs-4/packages/acs-lang/tcl/lang-util-procs.xql	26 Feb 2005 16:00:09 -0000	1.4
@@ -25,4 +25,12 @@
       </querytext>
    </fullquery>
 
+   <fullquery name="lang::util::get_label.select">
+      <querytext>
+        select label 
+          from ad_locales
+         where lower(locale) = lower(:locale)
+      </querytext>
+   </fullquery>
+
 </queryset>