Index: openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl,v
diff -u -r1.147.2.12 -r1.147.2.13
--- openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	13 Jul 2020 12:02:33 -0000	1.147.2.12
+++ openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	19 Aug 2020 16:53:33 -0000	1.147.2.13
@@ -420,7 +420,8 @@
     #
     ${:data} set creator [::xo::get_user_name [::xo::cc user_id]]
     if {[${:data} name] eq ""} {
-      ${:data} set nls_language [::xo::cc locale]
+      set nls_language [[${:data} package_id] default_locale]
+      ${:data} set nls_language $nls_language
     }
     next
   }