Index: openacs-4/packages/acs-subsite/tcl/subsite-navigation-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/subsite-navigation-procs.tcl,v diff -u -r1.3.10.4 -r1.3.10.5 --- openacs-4/packages/acs-subsite/tcl/subsite-navigation-procs.tcl 18 Sep 2015 07:21:07 -0000 1.3.10.4 +++ openacs-4/packages/acs-subsite/tcl/subsite-navigation-procs.tcl 22 Apr 2017 13:39:09 -0000 1.3.10.5 @@ -175,8 +175,13 @@ set navigation_id "" } + set joined_url [file join $base_url $info(url)] + if {[string index $info(url) end] eq "/"} { + append joined_url / + } + template::multirow append $multirow \ - $group $info(label) [file join $base_url $info(url)] \ + $group $info(label) $joined_url \ "" $info(title) "" $info(accesskey) "" $navigation_id [template::multirow size $multirow] \ $info(name) $parent $info(display_template)