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.49 -r1.50
--- openacs-4/packages/acs-lang/tcl/locale-procs.tcl	25 Jul 2018 19:34:13 -0000	1.49
+++ openacs-4/packages/acs-lang/tcl/locale-procs.tcl	25 Jul 2018 19:37:26 -0000	1.50
@@ -725,33 +725,6 @@
     return $timezone
 }
 
-
-#####
-#
-# Backwards compatibility procs
-#
-#####
-ad_proc -deprecated -warn -public ad_locale_get_label { locale } {
-
-    Returns the label (name) of locale
-
-    To be removed in 5.3
-
-    @author         Bruno Mattarollo (bruno.mattarollo@ams.greenpeace.org)
-
-    @param locale   Code for the locale, eg "en_US"
-
-    @return         String containing the label for the locale
-
-    @see lang::util::get_label
-} {
-    return [db_string select_locale_label {
-        select label
-          from ad_locales
-         where lower(locale) = lower(:locale)
-    }]
-}
-
 # Local variables:
 #    mode: tcl
 #    tcl-indent-level: 4