print $cgi->a({-href => href(project => undef,
project_filter => $dirprefix,
action => "project_list")},
- esc_html($part)) . " / ";
+ esc_html($part)) . "/";
}
}
sub print_nav_breadcrumbs {
my %opts = @_;
+ my $sep = to_utf8(" › ");
+ my $first = 1;
for my $crumb (@extra_breadcrumbs, [ $home_link_str => $home_link ]) {
- print $cgi->a({-href => esc_url($crumb->[1])}, $crumb->[0]) . " / ";
+ print $sep unless $first;
+ $first = 0;
+ print $cgi->a({-href => esc_url($crumb->[1])}, $crumb->[0]);
}
if (defined $project) {
my @dirname = split '/', $project;
my $projectbasename = pop @dirname;
+ print $sep;
print_nav_breadcrumbs_path(@dirname);
print $cgi->a({-href => href(action=>"summary")}, esc_html($projectbasename));
if (defined $action) {
$action_print = $cgi->a({-href => href(action=>$action)},
$action);
}
- print " / $action_print";
+ print "$sep$action_print";
}
if (defined $opts{-action_extra}) {
- print " / $opts{-action_extra}";
+ print "$sep$opts{-action_extra}";
}
print "\n";
} elsif (defined $project_filter) {
+ print $sep;
print_nav_breadcrumbs_path(split '/', $project_filter);
}
}