Index: openacs-4/packages/acs-lang/www/admin/message-search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/message-search.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-lang/www/admin/message-search.tcl	14 Aug 2003 16:06:20 -0000	1.2
+++ openacs-4/packages/acs-lang/www/admin/message-search.tcl	26 Feb 2005 16:00:10 -0000	1.3
@@ -13,17 +13,17 @@
 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 "Search Messages"
 set context [list [list "package-list?[export_vars { locale }]" $locale_label] $page_title]
 
 set default_locale en_US
 
 set search_locales [list]
-lappend search_locales [list "Current locale - [ad_locale_get_label $locale]" $locale ]
-lappend search_locales [list "Master locale - [ad_locale_get_label $default_locale]" $default_locale]
+lappend search_locales [list "Current locale - [lang::util::get_label $locale]" $locale ]
+lappend search_locales [list "Master locale - [lang::util::get_label $default_locale]" $default_locale]
 
 set submit_p 0