aboutsummaryrefslogtreecommitdiff
path: root/t/readfile.t
blob: 5332f4c352a0abc603ab8786febf6780820997da (plain)
1
2
3
4
5
6
7
8
9
10
11
12
#!/usr/bin/perl
use warnings;
use strict;
use Test::More tests => 3;
use Encode;

BEGIN { use_ok("IkiWiki"); }

# should read files as utf8
ok(Encode::is_utf8(IkiWiki::readfile("t/test1.mdwn"), 1));
is(IkiWiki::readfile("t/test1.mdwn"),
	Encode::decode_utf8('![o](../images/o.jpg "ó")'."\n".'óóóóó'."\n"));