Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl,v
diff -u -r1.68 -r1.69
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	25 Apr 2018 08:46:13 -0000	1.68
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	25 Apr 2018 19:23:26 -0000	1.69
@@ -470,7 +470,7 @@
 
     @author Lars Pind (lars@collaboraid.biz)
 } {
-    set cols [list]
+    set cols {}
     foreach var { authority_id username screen_name password_question password_answer email_verified_p } {
         if { [info exists $var] } {
             lappend cols "$var = :$var"
@@ -559,7 +559,7 @@
 
     @author Lars Pind (lars@collaboraid.biz)
 } {
-    set cols [list]
+    set cols {}
     foreach var { email url } {
         if { [info exists $var] } {
             lappend cols "$var = :$var"