Index: openacs-4/packages/acs-lang/tcl/test/acs-lang-localization-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/test/acs-lang-localization-procs.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/acs-lang/tcl/test/acs-lang-localization-procs.tcl	7 Aug 2017 23:47:57 -0000	1.3
+++ openacs-4/packages/acs-lang/tcl/test/acs-lang-localization-procs.tcl	22 Jul 2018 09:46:48 -0000	1.4
@@ -17,6 +17,10 @@
       lc_time_utc_to_local
       lc_time_local_to_utc
 
+      lang::catalog::import
+      lang::catalog::import
+      lang::system::locale_set_enabled
+
     } lang_test__lc_numeric {
 
     Minimal testset for localization functions. To be extended.
@@ -32,22 +36,22 @@
 
     lang::catalog::import -locales it_IT -package_key acs-lang
     lang::catalog::import -locales de_DE -package_key acs-lang
-    
+
     aa_equals "format us number" [lc_numeric 123456.789 {} en_US] 123,456.789
     aa_equals "format de number" [lc_numeric 123456.789 {} de_DE] 123.456,789
     aa_equals "format it number" [lc_numeric 123456.789 {} it_IT] 123.456,789
 
     aa_equals "parse us number" [lc_parse_number 123,456.789 en_US] 123456.789
     aa_equals "parse de number" [lc_parse_number 123.456,789 de_DE] 123456.789
     aa_equals "parse it number" [lc_parse_number 123.456,789 it_IT] 123456.789
-    
-    set time [lc_time_fmt "2013-09-21 23:11:22" "%c" en_US] 
+
+    set time [lc_time_fmt "2013-09-21 23:11:22" "%c" en_US]
     aa_equals "format us time" [lrange $time 0 end-1] "Sat September 21, 2013 11:11 PM"
 
-    set time [lc_time_fmt "2013-09-21 23:11:22" "%c" de_DE] 
+    set time [lc_time_fmt "2013-09-21 23:11:22" "%c" de_DE]
     aa_equals "format us time" [lrange $time 0 end-1] "Sa, 21. September 2013 23:11"
 
-    set time [lc_time_fmt "2013-09-21 23:11:22" "%c" it_IT] 
+    set time [lc_time_fmt "2013-09-21 23:11:22" "%c" it_IT]
     aa_equals "format us time" [lrange $time 0 end-1] "Sab 21 Settembre 2013 23:11"
 
     aa_equals "asian time " [lc_time_utc_to_local "2013-09-21 23:11:22" "Asia/Tokyo"] "2013-09-22 08:11:22"