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 -N -r1.140 -r1.141
--- openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	22 Dec 2017 13:51:41 -0000	1.140
+++ openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl	21 Mar 2018 19:39:52 -0000	1.141
@@ -56,7 +56,7 @@
 
     foreach __field $field_list {
       # if there is no field spec, use the default from the slot definitions
-      set __spec  [expr {[:exists f.$__field] ? [:set f.$__field] : "="}]
+      set __spec  [expr {[info exists :f.$__field] ? [set :f.$__field] : "="}]
       set __wspec [lindex $__spec 0]
       #my msg "$__field: wspec=$__wspec, spec=$__spec"