need to remove trailing slashes in not one, but 2 places

htmllink needs to do it because it uses the basename of the link as the link
text

bestlink needs to do it because it is not always called from htmllink
master
Joey Hess 2007-11-17 16:32:02 -05:00
parent e79eac82b0
commit 3e17b7d612
1 changed files with 2 additions and 0 deletions

View File

@ -407,6 +407,7 @@ sub bestlink ($$) { #{{{
# absolute links
$cwd="";
}
$link=~s/\/$//;
do {
my $l=$cwd;
@ -541,6 +542,7 @@ sub htmllink ($$$;@) { #{{{
my $page=shift; # the page that will contain the link (different for inline)
my $link=shift;
my %opts=@_;
$link=~s/\/$//;
my $bestlink;