Index: openacs-4/packages/acs-subsite/www/site-map/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/site-map/index.tcl,v diff -u -N -r1.11 -r1.12 --- openacs-4/packages/acs-subsite/www/site-map/index.tcl 26 Apr 2018 08:56:37 -0000 1.11 +++ openacs-4/packages/acs-subsite/www/site-map/index.tcl 9 May 2018 15:33:28 -0000 1.12 @@ -128,7 +128,7 @@ } multirow create nodes node_id expand_mode expand_url tree_indent name name_url instance instance_url type action_type action_form_part add_folder_url new_app_url unmount_url mount_url rename_url delete_url parameters_url permissions_url extra_form_part view_p -set open_nodes {} +set open_nodes [list] db_foreach nodes_select {} { set add_folder_url "" @@ -191,7 +191,7 @@ set expand_mode 0 if {!$root_p && $n_children > 0} { set expand_mode 1 - set urlvars {} + set urlvars [list] foreach n $expand { if {$n == $node_id} { set expand_mode 2