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.48 -r1.284.2.49
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	4 Nov 2019 10:44:52 -0000	1.284.2.48
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	11 Nov 2019 12:49:45 -0000	1.284.2.49
@@ -3068,7 +3068,7 @@
       set :correction {}
       foreach o ${:options} a ${:answer} {
         lassign $o label v
-        if {$a} {
+        if {$a ne ""} {
           lappend :correction [expr {$v in $value}]
           #:log "enumeration CORRECT? <$a> <$v in $value> -> [expr {$v in $value}]"
         } else {