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 -N -r1.45 -r1.46
--- openacs-4/packages/acs-lang/tcl/locale-procs.tcl	28 Jun 2018 08:07:54 -0000	1.45
+++ openacs-4/packages/acs-lang/tcl/locale-procs.tcl	28 Jun 2018 08:47:27 -0000	1.46
@@ -206,7 +206,8 @@
 
     @author Peter Marklund
 } {
-    set key ::__per_request(lang::system::get_locales_not_cached)
+    #set key ::__per_request(lang::system::get_locales_not_cached)
+    set key ::lang::system_get_locales_not_cached
     if {![info exists $key]} {
         set $key [util_memoize lang::system::get_locales_not_cached]
     }