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 -r1.284.2.77 -r1.284.2.78
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	4 Feb 2020 19:58:59 -0000	1.284.2.77
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	6 Feb 2020 13:43:08 -0000	1.284.2.78
@@ -3464,7 +3464,7 @@
       return 0
     } else {
       set value [:value]
-      :log "enumeration CORRECT? answers [llength ${:answer}] options [llength ${:options}]"
+      #:log "enumeration CORRECT? answers [llength ${:answer}] options [llength ${:options}]"
       set :correction {}
       set r 0; set f 0; set rk 0; set fk 0; set W 0; set O 0; set R 0
       foreach o ${:options} a ${:answer} {