aboutsummaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
Diffstat (limited to 't')
-rwxr-xr-xt/pagetitle.t3
-rwxr-xr-xt/titlepage.t3
2 files changed, 4 insertions, 2 deletions
diff --git a/t/pagetitle.t b/t/pagetitle.t
index 1bb4421e4..37adba144 100755
--- a/t/pagetitle.t
+++ b/t/pagetitle.t
@@ -1,7 +1,7 @@
#!/usr/bin/perl
use warnings;
use strict;
-use Test::More tests => 6;
+use Test::More tests => 7;
BEGIN { use_ok("IkiWiki"); }
@@ -10,3 +10,4 @@ is(IkiWiki::pagetitle("foo_bar_baz"), "foo bar baz");
is(IkiWiki::pagetitle("foo_bar__33__baz"), "foo bar!baz");
is(IkiWiki::pagetitle("foo_bar__1234__baz"), "foo barӒbaz");
is(IkiWiki::pagetitle("foo_bar___33___baz"), "foo bar ! baz");
+is(IkiWiki::pagetitle("foo_bar___95___baz"), "foo bar _ baz");
diff --git a/t/titlepage.t b/t/titlepage.t
index 6e1856a15..cc56db70c 100755
--- a/t/titlepage.t
+++ b/t/titlepage.t
@@ -1,7 +1,7 @@
#!/usr/bin/perl
use warnings;
use strict;
-use Test::More tests => 6;
+use Test::More tests => 7;
BEGIN { use_ok("IkiWiki"); }
@@ -10,3 +10,4 @@ is(IkiWiki::titlepage("foo bar baz"), "foo_bar_baz");
is(IkiWiki::titlepage("foo bar/baz"), "foo_bar/baz");
is(IkiWiki::titlepage("foo bar&baz"), "foo_bar__38__baz");
is(IkiWiki::titlepage("foo bar & baz"), "foo_bar___38___baz");
+is(IkiWiki::titlepage("foo bar_baz"), "foo_bar__95__baz");