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.48.2.3 -r1.48.2.4
--- openacs-4/packages/acs-tcl/tcl/navigation-procs.tcl	4 Apr 2019 12:16:58 -0000	1.48.2.3
+++ openacs-4/packages/acs-tcl/tcl/navigation-procs.tcl	13 Nov 2019 17:02:38 -0000	1.48.2.4
@@ -224,11 +224,11 @@
 } {
     set counter 0
     foreach arg $args {
-        lappend link_list [subst {<a href="[ns_quotehtml [lindex $element 0]]">[ns_quotehtml [lindex $element 1]]</a>}]
+        lappend link_list [subst {<a href="[ns_quotehtml [lindex $arg 0]]">[ns_quotehtml [lindex $arg 1]]</a>}]
         incr counter
     }
     if { $counter } {
-        return "\[[join $link_list " | "]\]"
+        return "\[[join $link_list { | }]\]"
     } else {
         return ""
     }