From cd8cecc2a64e623d1342b7b37aa1506ad40c3a6e Mon Sep 17 00:00:00 2001 From: dakkar Date: Sat, 5 Sep 2015 16:35:10 +0100 Subject: deps test fails --- t/tests/page.t | 34 ++++++++++++++++++++++++++++++++++ 1 file changed, 34 insertions(+) create mode 100644 t/tests/page.t (limited to 't') diff --git a/t/tests/page.t b/t/tests/page.t new file mode 100644 index 0000000..e42e738 --- /dev/null +++ b/t/tests/page.t @@ -0,0 +1,34 @@ +# -*- mode: perl6 -*- +use Test; +use lib 't/lib'; +use Test::WebCoso; +use File::Temp; +use WebCoso; + +my $testdir = tempdir.IO; +my $srcdir = $testdir.child('src'); +my $destdir = $testdir.child('dst'); + +$srcdir.mkdir; +$destdir.mkdir; + +$srcdir.child('document.it.tt').spurt('it'); +$srcdir.child('document.en.rest.txt').spurt('en'); + +my $wc = WebCoso.new(:$srcdir,:$destdir); +$wc.new-page(Nil); +$wc.run(); + +my %output = $wc.get-files(Nil,'document','html'); +dd %output; + +cmp-files( + %output, + { + it => { $^x.slurp eq 'it expanded parsed converted decorated' }, + en => { $^x.slurp eq 'en parsed converted decorated' }, + }, + 'built everyting', +); + +done-testing; -- cgit v1.2.3