diff options
author | dakkar <dakkar@thenautilus.net> | 2015-09-05 16:35:10 +0100 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2015-09-05 16:35:10 +0100 |
commit | cd8cecc2a64e623d1342b7b37aa1506ad40c3a6e (patch) | |
tree | 5c1981e36755928b189edbac48629d280bef480c /t | |
parent | first maker test (diff) | |
download | WebCoso-p6-cd8cecc2a64e623d1342b7b37aa1506ad40c3a6e.tar.gz WebCoso-p6-cd8cecc2a64e623d1342b7b37aa1506ad40c3a6e.tar.bz2 WebCoso-p6-cd8cecc2a64e623d1342b7b37aa1506ad40c3a6e.zip |
deps test fails
Diffstat (limited to 't')
-rw-r--r-- | t/tests/page.t | 34 |
1 files changed, 34 insertions, 0 deletions
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; |