Index: openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl,v
diff -u -r1.14.2.6 -r1.14.2.7
--- openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl	27 Jun 2019 08:55:54 -0000	1.14.2.6
+++ openacs-4/packages/xowf/tcl/test/xowf-test-procs.tcl	27 Jun 2019 09:09:37 -0000	1.14.2.7
@@ -110,6 +110,8 @@
 
         set instance $_test_instance_name
         set testfolder .testfolder
+        set locale [lang::system::locale]
+        set lang [string range $locale 0 1]
 
         try {
 
@@ -165,6 +167,7 @@
                 -update [subst -nocommands {
                     _title "TIP Workflow"
                     _name tip.wf
+                    _nls_language $locale
                     workflow_definition {
                         # Actions are used here with the following parameters:
                         #   next_state: state after activation of action
@@ -212,12 +215,13 @@
                 -path $testfolder \
                 -parent_id $folder_id \
                 -form_name $lang:tip.wf \
-                -update {
+                -update [subst {
                     _title "TIP 1"
                     _name tip1
                     _text {Should we create a tip?}
                     __action_save ""
-                }
+                    _nls_language $locale
+                }]
 
             aa_log "Workflow instance tip1 created"