Index: openacs-4/packages/xowiki/tcl/form-field-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/form-field-procs.tcl,v
diff -u -N -r1.284.2.47 -r1.284.2.48
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	3 Nov 2019 18:27:26 -0000	1.284.2.47
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	4 Nov 2019 10:44:52 -0000	1.284.2.48
@@ -479,7 +479,7 @@
   }
 
   FormField instproc is_disabled {} {
-    return [expr {[info exists :disabled] && ${:disabled} != "false"}]
+    return [expr {[info exists :disabled] && [string is true -strict ${:disabled}]}]
   }
 
 
@@ -3280,7 +3280,7 @@
       lappend fields [list $rep "text,$disabled_as_div,correct_when=[::xowiki::formfield::FormField fc_encode $a],disabled=$disabled,label="]
     }
 
-    #:log "TEXT text_fields fields <$fields>"
+    #:log "TEXT text_fields fields\n[join $fields \n]>"
     :create_components $fields
     #:log "TEXT text_fields components <${:components}>"