aboutsummaryrefslogtreecommitdiff
path: root/t/titlepage.t
diff options
context:
space:
mode:
authorjoey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>2006-05-04 18:51:26 +0000
committerjoey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071>2006-05-04 18:51:26 +0000
commit642f73a39fa5249e01b384cda24e44bfb805e971 (patch)
treebdc6fc39b8241d1798a8ce1dc45f1a0483a412b8 /t/titlepage.t
parent0e8d8be117c3d10690208b1d75513c5cdd34ad4a (diff)
downloadikiwiki-642f73a39fa5249e01b384cda24e44bfb805e971.tar
ikiwiki-642f73a39fa5249e01b384cda24e44bfb805e971.tar.gz
dirname, basename, bestlink, linkify, pagetitle, titlepage.
* Allow links of the form [[some page|page]], with whitespace in the link text.
Diffstat (limited to 't/titlepage.t')
-rwxr-xr-xt/titlepage.t12
1 files changed, 12 insertions, 0 deletions
diff --git a/t/titlepage.t b/t/titlepage.t
new file mode 100755
index 000000000..6e1856a15
--- /dev/null
+++ b/t/titlepage.t
@@ -0,0 +1,12 @@
+#!/usr/bin/perl
+use warnings;
+use strict;
+use Test::More tests => 6;
+
+BEGIN { use_ok("IkiWiki"); }
+
+is(IkiWiki::titlepage("foo bar"), "foo_bar");
+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");