Index: openacs-4/contrib/packages/vocabulary/tcl/vocabulary-train-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/vocabulary/tcl/vocabulary-train-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/vocabulary/tcl/vocabulary-train-procs.tcl	23 Feb 2004 23:00:08 -0000	1.1
+++ openacs-4/contrib/packages/vocabulary/tcl/vocabulary-train-procs.tcl	26 Feb 2005 16:00:09 -0000	1.2
@@ -80,7 +80,7 @@
                     } else {
                         set phonetic ""
                     }
-                    set label [ad_locale_get_label $locale_b]
+                    set label [lang::util::get_label $locale_b]
                     set question "What does <em>$word(word)</em> $phonetic mean in $label?"
                 }
                 if { ![exists_and_not_null answer] } {