Index: openacs-4/packages/xowiki/tcl/package-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v
diff -u -N -r1.291.2.7 -r1.291.2.8
--- openacs-4/packages/xowiki/tcl/package-procs.tcl	7 Nov 2015 14:09:13 -0000	1.291.2.7
+++ openacs-4/packages/xowiki/tcl/package-procs.tcl	30 Nov 2015 13:02:52 -0000	1.291.2.8
@@ -87,13 +87,17 @@
   }
 
   Package instproc default_locale {} {
+    if {[my exists __default_locale]} {
+      return [my set __default_locale]
+    }
     if {[my get_parameter use_connection_locale 0]} {
       # we return the connection locale (if not connected the system locale)
       set locale [::xo::cc locale]
     } else {
       # return either the package locale or the site-wide locale
       set locale [lang::system::locale -package_id [my id]]
     }
+    my set __default_locale $locale
     return $locale
   }