Index: openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl	1 Oct 2017 12:16:05 -0000	1.14
+++ openacs-4/packages/acs-subsite/tcl/attribute-procs.tcl	27 Jan 2018 16:19:08 -0000	1.15
@@ -244,10 +244,9 @@
 	error "We do not have enough information to automatically remove this attribute. Namely, we are missing either the table name or the column name"
     }
 
-    set plsql [list]
-    lappend plsql [list "drop_attribute" "FOO" "db_exec_plsql"]
+    set plsql {drop_attribute FOO db_exec_plsql}
     if { [db_column_exists $table_name $column_name] } {
-        lappend plsql [list "drop_attr_column" "FOO" "db_dml"]
+        lappend plsql {drop_attr_column FOO db_dml}
     }
 
     foreach cmd $plsql {