Commit eb13efa5 authored by Vitaly Lipatov's avatar Vitaly Lipatov Committed by System Administrator

Template.pm: add regexp fixes

parent a4429897
...@@ -287,22 +287,23 @@ sub quoteUrls { ...@@ -287,22 +287,23 @@ sub quoteUrls {
}eg; }eg;
# make eterbug number link to bug # make eterbug number link to bug
$bug_re = qr/eterbug\#?$s*([0-9]+)/i; $bug_re = qr/eterbug$s*\#?$s*([0-9]+)/i;
# hack: user prev comment_re # hack: user prev comment_re
$text =~ s~$bug_re $text =~ s~($bug_re)
~ # We have several choices. $1 here is the link, and $2-4 are set ~ # We have several choices. $1 here is the link, and $2-4 are set
# depending on which part matched # depending on which part matched
get_bug_link($1, $1, { user => $user }) get_bug_link($2, $1, { user => $user })
~egx; ~egx;
# make # number link to bug # make # number link to bug
$bug_re = qr/[^&]\#$s*([0-9]+)/i; #$bug_re = qr/[^&]\#$s*([0-9]+)/i;
$bug_re = qr/\#$s*([0-9]+)/i;
#my $bug_ren = qr/\QTOG\E$s*\#?$s*([0-9]+)/i; #my $bug_ren = qr/\QTOG\E$s*\#?$s*([0-9]+)/i;
# hack: user prev comment_re # hack: user prev comment_re
$text =~ s~$bug_re $text =~ s~($bug_re)
~ # We have several choices. $1 here is the link, and $2-4 are set ~ # We have several choices. $1 here is the link, and $2-4 are set
# depending on which part matched # depending on which part matched
get_bug_link($1, $1, { user => $user }) get_bug_link($2, $1, { user => $user })
~egx; ~egx;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment