diff options
Diffstat (limited to 't')
-rw-r--r-- | t/lib/Test/WebCoso.pm | 2 | ||||
-rw-r--r-- | t/tests/maker.t | 4 | ||||
-rw-r--r-- | t/tests/page.t | 5 | ||||
-rw-r--r-- | t/tests/webcoso.t | 2 |
4 files changed, 7 insertions, 6 deletions
diff --git a/t/lib/Test/WebCoso.pm b/t/lib/Test/WebCoso.pm index 1f54c92..083ef09 100644 --- a/t/lib/Test/WebCoso.pm +++ b/t/lib/Test/WebCoso.pm @@ -11,7 +11,7 @@ sub cmp-files($a,$b,$msg) is export { $cmp.($a{$_}) } else { - $a{$_}.abspath eq $cmp.abspath + $a{$_}.path.IO.abspath eq $cmp.path.IO.abspath } }, $a.keys), $msg, diff --git a/t/tests/maker.t b/t/tests/maker.t index a09ec19..4d21a0f 100644 --- a/t/tests/maker.t +++ b/t/tests/maker.t @@ -25,8 +25,8 @@ my %output = $m.make(); cmp-files( %output, { - en => { $^x.slurp eq 'en expanded' }, - it => { $^x.slurp eq 'it expanded' }, + en => { $^x.contents eq 'en expanded' }, + it => { $^x.contents eq 'it expanded' }, }, 'made the files', ); diff --git a/t/tests/page.t b/t/tests/page.t index 939c404..57ac1cb 100644 --- a/t/tests/page.t +++ b/t/tests/page.t @@ -14,6 +14,7 @@ $destdir.mkdir; $srcdir.child('document.it.tt').spurt('it'); $srcdir.child('document.en.rest.txt').spurt('en'); +$srcdir.child('du2xhtml.xsl').spurt('<>'); my $wc = WebCoso.new(:$srcdir,:$destdir); $wc.new-page(''); @@ -25,8 +26,8 @@ dd %output; cmp-files( %output, { - it => { $^x.slurp eq 'it expanded parsed converted decorated' }, - en => { $^x.slurp eq 'en parsed converted decorated' }, + it => { $^x.contents eq 'it expanded parsed converted decorated' }, + en => { $^x.contents eq 'en parsed converted decorated' }, }, 'built everyting', ); diff --git a/t/tests/webcoso.t b/t/tests/webcoso.t index 49e28ee..84d24fb 100644 --- a/t/tests/webcoso.t +++ b/t/tests/webcoso.t @@ -36,7 +36,7 @@ subtest { my $put = $wc.put-file('two','document','en','txt', 'something'); - ok($put.abspath ~~ /two\/document\.en\.txt$/, + ok($put.path.IO.abspath ~~ /two\/document\.en\.txt$/, 'put-file works', ); |