Index: openacs-4/packages/edit-this-page/tcl/etp-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/edit-this-page/tcl/etp-procs.tcl,v
diff -u -r1.21 -r1.22
--- openacs-4/packages/edit-this-page/tcl/etp-procs.tcl	7 Sep 2013 12:50:57 -0000	1.21
+++ openacs-4/packages/edit-this-page/tcl/etp-procs.tcl	3 Oct 2013 09:15:25 -0000	1.22
@@ -437,7 +437,7 @@
     # handle customized standard attribute names
     # which are set up with etp application parameters
     set attr_name [lindex $attribute_desc 0]
-    if { [lsearch -exact { title description content } $attr_name] != -1 } {
+    if {$attr_name in { title description content }} {
 	if { $page_name eq "index" } {
 	    set param_name "index_${attr_name}_attr_name"
 	} else {
@@ -658,7 +658,7 @@
 	    continue
 	}
 
-	if { [lsearch -exact { item_id revision_id content publish_date } $arg] != -1 } {
+	if {$arg in { item_id revision_id content publish_date }} {
 	    append columns ",\n r.$arg"
 	} else {
 	    ns_log debug "get_content_items: extended attribute named $arg"