X-Git-Url: http://git.tremily.us/?a=blobdiff_plain;f=t%2Fcrazy-badass-perl-bug.t;h=328a979c2a7158dbfa3d98ea3ea49f2405f71c80;hb=d1a1844263e804cbb00a7196bdd0c70501a8d380;hp=631752fa85b61a0ad3971ad334e7c45d2c1e16ac;hpb=a5fdf4714732c754c6bee16ff65fa85968737010;p=ikiwiki.git

diff --git a/t/crazy-badass-perl-bug.t b/t/crazy-badass-perl-bug.t
index 631752fa8..328a979c2 100755
--- a/t/crazy-badass-perl-bug.t
+++ b/t/crazy-badass-perl-bug.t
@@ -2,20 +2,19 @@
 # DO NOT CHANGE ANYTHING IN THIS FILE.
 # THe crazy bug reproduced here will go away if any of the calls
 # to htmlize are changed.
+# Note: This was http://bugs.debian.org/376329 , and was fixed in 
+# perl 5.14.
 use warnings;
 use strict;
-use Test::More tests => 103;
+use Test::More tests => 102;
 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="&oacute;" />\nóóóóó</p>\n}),
-	"utf8; bug #373203");
-ok(IkiWiki::htmlize(".mdwn", IkiWiki::readfile("t/test3.mdwn")),
+%config=IkiWiki::defaultconfig();
+$config{srcdir}=$config{destdir}="/dev/null";
+IkiWiki::loadplugins(); IkiWiki::checkconfig();
+ok(IkiWiki::htmlize("foo", "foo", "mdwn", readfile("t/test1.mdwn")));
+ok(IkiWiki::htmlize("foo", "foo", "mdwn", readfile("t/test3.mdwn")),
 	"wtf?") for 1..100;