Index: openacs-4/packages/acs-lang/www/admin/package-list.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/package-list.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-lang/www/admin/package-list.tcl	11 Dec 2003 21:39:53 -0000	1.5
+++ openacs-4/packages/acs-lang/www/admin/package-list.tcl	26 Feb 2005 16:00:10 -0000	1.6
@@ -22,8 +22,8 @@
 set current_locale $locale
 set default_locale en_US
 
-set locale_label [ad_locale_get_label $current_locale]
-set default_locale_label [ad_locale_get_label $default_locale]
+set locale_label [lang::util::get_label $current_locale]
+set default_locale_label [lang::util::get_label $default_locale]
 
 set page_title $locale_label
 set context [list $page_title]
@@ -85,8 +85,8 @@
 #####
 
 set search_locales [list \
-                        [list "Current locale - [ad_locale_get_label $current_locale]" $current_locale] \
-                        [list "Master locale - [ad_locale_get_label $default_locale]" $default_locale]]
+                        [list "Current locale - [lang::util::get_label $current_locale]" $current_locale] \
+                        [list "Master locale - [lang::util::get_label $default_locale]" $default_locale]]
 
 ad_form -name search -action message-search -form {
     {locale:text(hidden) {value $locale}}