Index: openacs-4/packages/webmail-system/www/folder-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/webmail-system/www/folder-delete.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/webmail-system/www/folder-delete.tcl 17 Apr 2018 14:47:03 -0000 1.2 +++ openacs-4/packages/webmail-system/www/folder-delete.tcl 26 Apr 2018 08:56:39 -0000 1.3 @@ -46,7 +46,7 @@ # -------------------------- PROCESSING ------------------------- # set folders [ns_imap list $id $mailbox *] -set fnames [list] +set fnames {} foreach {odd even} $folders { lappend fnames $odd