Index: openacs-4/packages/acs-templating/tcl/list-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/list-procs.tcl,v
diff -u -r1.84 -r1.85
--- openacs-4/packages/acs-templating/tcl/list-procs.tcl	17 May 2018 07:45:19 -0000	1.84
+++ openacs-4/packages/acs-templating/tcl/list-procs.tcl	11 Jun 2018 22:02:26 -0000	1.85
@@ -3401,7 +3401,7 @@
                 set ad_form_element [list "[lindex $ad_form_element 0],multiple"]
             }
             foreach {var value} [array get form_element] {
-                if {[lsearch {name widget datatype} $var] < 0} {
+                if {$var ni {name widget datatype}} {
                     lappend ad_form_element [list $var $value]
                 }
             }