Wiki autolinks prefer longest title match
This commit is contained in:
parent
aaf7d9cf44
commit
265400a010
2 changed files with 2 additions and 2 deletions
|
|
@ -98,7 +98,7 @@ sub autolinkHtml {
|
|||
$key =~ s{\)}{\\\)}gxms; # escape parens
|
||||
$mapping{$key} = $self->session->url->gateway($mapping{$key});
|
||||
}
|
||||
my $matchString = join('|', map{quotemeta} keys %mapping);
|
||||
my $matchString = join('|', map{quotemeta} sort {length($b) <=> length($a)} keys %mapping);
|
||||
my $regexp = qr/($matchString)/i;
|
||||
my @acc = ();
|
||||
my $in_a = 0;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue