diff options
-rw-r--r-- | lib/VNDB/BBCode.pm | 4 | ||||
-rwxr-xr-x | util/bbcode-test.pl | 12 |
2 files changed, 8 insertions, 8 deletions
diff --git a/lib/VNDB/BBCode.pm b/lib/VNDB/BBCode.pm index fe3a43d7..a5050eab 100644 --- a/lib/VNDB/BBCode.pm +++ b/lib/VNDB/BBCode.pm @@ -139,8 +139,8 @@ sub parse { while($raw =~ m{(?: \[ \/? (?i: b|i|u|s|spoiler|quote|code|url|raw ) [^\s\]]* \] | # tag d[1-9][0-9]* \# [1-9][0-9]* (?: \.[1-9][0-9]* )? | # d+#+[.+] - [tdvprcs][1-9][0-9]*\.[1-9][0-9]* | # v+.+ - [tdvprcsugi][1-9][0-9]* | # v+ + [tdvprcsw][1-9][0-9]*\.[1-9][0-9]* | # v+.+ + [tdvprcsugiw][1-9][0-9]* | # v+ (?:https?|ftp)://[^><"\n\s\]\[]+[\d\w=/-] # link )}xg) { my $token = $&; diff --git a/util/bbcode-test.pl b/util/bbcode-test.pl index d08f70c9..230277b5 100755 --- a/util/bbcode-test.pl +++ b/util/bbcode-test.pl @@ -117,17 +117,17 @@ my @tests = ( 'some text <b class="spoiler">with (<a href="/v17">v17</a>) tags</b> and internal ids such as <a href="/s1">s1</a>', 'some text and internal ids such as s1', - 'r12.1 v6.3 s1.2', - '<a href="/r12.1">r12.1</a> <a href="/v6.3">v6.3</a> <a href="/s1.2">s1.2</a>', - 'r12.1 v6.3 s1.2', + 'r12.1 v6.3 s1.2 w5.3', + '<a href="/r12.1">r12.1</a> <a href="/v6.3">v6.3</a> <a href="/s1.2">s1.2</a> <a href="/w5.3">w5.3</a>', + 'r12.1 v6.3 s1.2 w5.3', 'd3 d1.3 d2#4 d5#6.7', '<a href="/d3">d3</a> <a href="/d1.3">d1.3</a> <a href="/d2#4">d2#4</a> <a href="/d5#6.7">d5#6.7</a>', 'd3 d1.3 d2#4 d5#6.7', - 'v17 text dds16v21 more text1 v9 _d5_ d3-', - '<a href="/v17">v17</a> text dds16v21 more text1 <a href="/v9">v9</a> _d5_ d3-', - 'v17 text dds16v21 more text1 v9 _d5_ d3-', + 'v17 text dds16v21 more text1 v9 _d5_ d3- m10', + '<a href="/v17">v17</a> text dds16v21 more text1 <a href="/v9">v9</a> _d5_ d3- m10', + 'v17 text dds16v21 more text1 v9 _d5_ d3- m10', # https://vndb.org/t2520.233 '[From[url=http://densetsu.com/display.php?id=468&style=alphabetical] Anime Densetsu[/url]]', |