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.232 -r1.284.2.233 --- openacs-4/packages/xowiki/tcl/form-field-procs.tcl 22 Dec 2022 02:51:37 -0000 1.284.2.232 +++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl 24 Jan 2023 11:28:27 -0000 1.284.2.233 @@ -4761,7 +4761,7 @@ lappend atts disabled true } #ns_log notice ATTS=$atts - if {$rep in $value} { + if {[string is list -strict $value] && $rep in $value} { lappend atts checked checked } if {1 || ${:horizontal}} {lappend label_class [::xowiki::CSS class checkbox-inline]} @@ -5021,7 +5021,7 @@ } lappend atts value $rep #:msg "lsearch {$value} $rep ==> [lsearch $value $rep]" - if {$rep in $value} { + if {[string is list -strict $value] && $rep in $value} { lappend atts selected selected } ::html::option $atts {::html::t $label}