diff options
Diffstat (limited to 't/02-driver.t')
-rw-r--r-- | t/02-driver.t | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/t/02-driver.t b/t/02-driver.t deleted file mode 100644 index bdcf78b..0000000 --- a/t/02-driver.t +++ /dev/null @@ -1,36 +0,0 @@ -#!/usr/bin/perl -use strict; -use warnings; -use Path::Class; -use Test::More 'no_plan'; -use Test::Exception; -use lib 't/lib'; -use WebCoso::Config; - -my $thisdir=file($0)->parent->absolute; - -BEGIN { use_ok('WebCoso::Driver'); } - -my $conf_file=<<'EOF'; -res('src/file1.rest.txt','Test','dst/file.html'); -EOF - -WebCoso::Config->read_scalar($conf_file,"$thisdir/config-in-test"); - -ok(WebCoso::Driver->run(), 'il driver va'); - -my @calls=WebCoso::Pipeline::Test->get_calls(); -my @resources=WebCoso::Config->get_all_resources(); -is(scalar @calls,2,'due chiamate'); -is($calls[0]->{resource}, - $resources[0], - 'alla risorsa giusta (1)'); -is($calls[1]->{resource}, - $resources[0], - 'alla risorsa giusta (2)'); -is($calls[0]->{stage}, - 'meta', - 'stage1==meta'); -is($calls[1]->{stage}, - 'gen', - 'stage1==gen'); |