Index: openacs-4/packages/cms/tcl/module-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/cms/tcl/module-procs.tcl,v diff -u -N -r1.11 -r1.12 --- openacs-4/packages/cms/tcl/module-procs.tcl 25 Apr 2018 19:47:46 -0000 1.11 +++ openacs-4/packages/cms/tcl/module-procs.tcl 9 May 2018 15:33:30 -0000 1.12 @@ -192,7 +192,7 @@ } { - set children {} + set children [list] if { [string equal $id {}] } { set id [getRootFolderID [ad_conn package_id]] @@ -222,7 +222,7 @@ } { - set children {} + set children [list] if { [string equal $id {}] } { set where_clause "k.parent_id is null" @@ -307,7 +307,7 @@ return [list] } - set children {} + set children [list] set module_name [namespace tail [namespace current]]