Index: openacs-4/packages/openacs-bootstrap3-theme/resources/widgets/navigation.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/openacs-bootstrap3-theme/resources/widgets/navigation.tcl,v diff -u -N -r1.3 -r1.4 --- openacs-4/packages/openacs-bootstrap3-theme/resources/widgets/navigation.tcl 25 Apr 2018 19:47:47 -0000 1.3 +++ openacs-4/packages/openacs-bootstrap3-theme/resources/widgets/navigation.tcl 9 May 2018 15:33:33 -0000 1.4 @@ -6,7 +6,7 @@ if { [template::multirow exists navigation] } { set selected_main_nav_item "" if { ![info exists navigation_groups] } { - set navigation_groups {} + set navigation_groups [list] } for {set i 1} {$i <= [template::multirow size navigation]} {incr i} { template::multirow get navigation $i @@ -24,7 +24,7 @@ # template::multirow get navigation $i # ns_log notice [array get navigation] #} -array set submenus {} +array set submenus [list] for {set i 1} {$i <= [template::multirow size navigation]} {incr i} { template::multirow get navigation $i if {$navigation(display_template) ne ""} {