summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2010-12-19 09:29:29 +0100
committerYorhel <git@yorhel.nl>2010-12-19 09:29:29 +0100
commitdf7f5c13faab514b7ff8ea76635059b9c09629af (patch)
tree3986a8012caa179a7de7de24afbafaf4412c5840
parenteaf9e895daab98eb122f2570bb409794b3257c99 (diff)
VNDBUtil::bb2html(): Fixed bug with lowercasing all [url=..] URLs
-rw-r--r--ChangeLog1
-rw-r--r--lib/VNDBUtil.pm4
2 files changed, 3 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index c1e85302..52046c44 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,6 @@
2.16 - ?
- VNDBUtil::bb2html(): Fixed bug when the string starts with a VNDBID
+ - VNDBUtil::bb2html(): Fixed bug with lowercasing all [url=..] URLs
- Fixed perl warning on /v/search redirect without search query
2.15 - 2010-12-15
diff --git a/lib/VNDBUtil.pm b/lib/VNDBUtil.pm
index f28ff7f7..f5650d6d 100644
--- a/lib/VNDBUtil.pm
+++ b/lib/VNDBUtil.pm
@@ -100,8 +100,8 @@ sub bb2html {
$result .= '</a>';
pop @open;
next;
- } elsif($tag =~ s{\[url=((https?://|/)[^\]>]+)\]}{<a href="$1" rel="nofollow">}i) {
- $result .= $tag;
+ } elsif($match =~ s{\[url=((https?://|/)[^\]>]+)\]}{<a href="$1" rel="nofollow">}i) {
+ $result .= $match;
push @open, 'url';
next;
}