$l.="/" if length $l;
$l.=$link;
- if (exists $links{$l}) {
+ if (exists $pagesources{$l}) {
return $l;
}
elsif (exists $pagecase{lc $l}) {
if (length $config{userdir}) {
my $l = "$config{userdir}/".lc($link);
- if (exists $links{$l}) {
+ if (exists $pagesources{$l}) {
return $l;
}
elsif (exists $pagecase{lc $l}) {
my @attrs;
foreach my $attr (qw{rel class title}) {
if (defined $opts{$attr}) {
- push @attrs, " $attr=\"".$opts{attr}.'"';
+ push @attrs, " $attr=\"$opts{$attr}\"";
}
}