diff options
Diffstat (limited to 't/linkpage.t')
-rwxr-xr-x | t/linkpage.t | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/t/linkpage.t b/t/linkpage.t index 8085de153..db5fc7ae5 100755 --- a/t/linkpage.t +++ b/t/linkpage.t @@ -1,7 +1,7 @@ #!/usr/bin/perl use warnings; use strict; -use Test::More tests => 7; +use Test::More; BEGIN { use_ok("IkiWiki"); } @@ -11,3 +11,9 @@ is(linkpage("foo bar/baz"), "foo_bar/baz"); is(linkpage("foo bar&baz"), "foo_bar__38__baz"); is(linkpage("foo bar & baz"), "foo_bar___38___baz"); is(linkpage("foo bar_baz"), "foo_bar_baz"); +is(linkpage("foo bar\xACbaz"), "foo_bar__172__baz", 'U+00AC is in Latin-1 range'); +is(linkpage("foo bar\x{04D2}baz"), "foo_bar\x{04D2}baz", 'U+04D2 is alphanumeric'); +is(linkpage("foo bar\x{2260}baz"), "foo_bar__8800__baz", 'U+2260 is nonalphanumeric'); +is(linkpage("foo bar\x{0001F4A9}baz"), "foo_bar__128169__baz", 'U+1F4A9 is outside BMP'); + +done_testing; |