Index: openacs-4/packages/acs-tcl/tcl/navigation-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/navigation-procs.tcl,v diff -u -r1.32.2.7 -r1.32.2.8 --- openacs-4/packages/acs-tcl/tcl/navigation-procs.tcl 1 Dec 2016 15:44:13 -0000 1.32.2.7 +++ openacs-4/packages/acs-tcl/tcl/navigation-procs.tcl 16 Jan 2017 18:10:56 -0000 1.32.2.8 @@ -61,7 +61,7 @@ } { set context [list] - while { $node_id ne "" } { + while { $node_id ne "" } { array set node [site_node::get -node_id $node_id] # JCD: Provide something for the name if the instance name is @@ -72,7 +72,11 @@ set node(instance_name) $node(name) } - set context [concat [list [list $node(url) [ns_quotehtml $node(instance_name)]]] $context] + # don't collect link for nodes without an object underneath + # (e.g. empty site folders), as they would just be dead links + if {$node(object_id) ne ""} { + set context [list [list $node(url) [ns_quotehtml $node(instance_name)]] {*}$context] + } # We have the break here, so that 'from_node' itself is included if {$node_id eq $from_node} {