diff options
| author | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-07-02 03:54:12 +0000 |
|---|---|---|
| committer | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-07-02 03:54:12 +0000 |
| commit | a5fdf4714732c754c6bee16ff65fa85968737010 (patch) | |
| tree | 0a056bb8411abc3c846fa8c8b84797e8f866dc65 /t | |
| parent | 995dfd6cf4e5bf07ded9bfa0b82da9233e2b3a16 (diff) | |
| download | ikiwiki-a5fdf4714732c754c6bee16ff65fa85968737010.tar ikiwiki-a5fdf4714732c754c6bee16ff65fa85968737010.tar.gz | |
FUCK UTF8 fuck fuck fuck!!!
(and perl)
Diffstat (limited to 't')
| -rwxr-xr-x | t/crazy-badass-perl-bug.t | 21 | ||||
| -rw-r--r-- | t/test3.mdwn | 1 |
2 files changed, 22 insertions, 0 deletions
diff --git a/t/crazy-badass-perl-bug.t b/t/crazy-badass-perl-bug.t new file mode 100755 index 000000000..631752fa8 --- /dev/null +++ b/t/crazy-badass-perl-bug.t @@ -0,0 +1,21 @@ +#!/usr/bin/perl +# DO NOT CHANGE ANYTHING IN THIS FILE. +# THe crazy bug reproduced here will go away if any of the calls +# to htmlize are changed. +use warnings; +use strict; +use Test::More tests => 103; +use Encode; + +BEGIN { use_ok("IkiWiki"); } +BEGIN { use_ok("IkiWiki::Render"); } + +# Initialize htmlscrubber plugin +%IkiWiki::config=IkiWiki::defaultconfig(); +$IkiWiki::config{srcdir}=$IkiWiki::config{destdir}="/dev/null"; +IkiWiki::checkconfig(); +is(IkiWiki::htmlize(".mdwn", IkiWiki::readfile("t/test1.mdwn")), + Encode::decode_utf8(qq{<p><img src="../images/o.jpg" alt="o" title="ó" />\nóóóóó</p>\n}), + "utf8; bug #373203"); +ok(IkiWiki::htmlize(".mdwn", IkiWiki::readfile("t/test3.mdwn")), + "wtf?") for 1..100; diff --git a/t/test3.mdwn b/t/test3.mdwn new file mode 100644 index 000000000..541628bb4 --- /dev/null +++ b/t/test3.mdwn @@ -0,0 +1 @@ +<h1>☺</h1> |