Index: openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl,v
diff -u -r1.25.6.3 -r1.25.6.4
--- openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl	2 Oct 2013 08:42:38 -0000	1.25.6.3
+++ openacs-4/packages/acs-content-repository/tcl/content-revision-procs.tcl	13 Oct 2013 14:25:22 -0000	1.25.6.4
@@ -120,7 +120,7 @@
 	}
 	foreach attribute_pair $attributes {
             lassign $attribute_pair attribute_name attribute_value
-	    if {[lsearch -exact $valid_attributes $attribute_name] > -1}  {
+	    if {$attribute_name in $valid_attributes}  {
 
                 # first add the column name to the list
 		append attribute_names  ", ${attribute_name}"