aboutsummaryrefslogtreecommitdiff
path: root/t/03-pipeline.t
diff options
context:
space:
mode:
Diffstat (limited to 't/03-pipeline.t')
-rw-r--r--t/03-pipeline.t53
1 files changed, 0 insertions, 53 deletions
diff --git a/t/03-pipeline.t b/t/03-pipeline.t
deleted file mode 100644
index a1b364b..0000000
--- a/t/03-pipeline.t
+++ /dev/null
@@ -1,53 +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;
-use WebCoso::Driver;
-use WebCoso::Pipeline::Test;
-
-my $thisdir=file($0)->parent->absolute;
-
-my $conf_file=<<'EOF';
-res('src/file1.rest.txt','Test','dst/file.html');
-EOF
-
-WebCoso::Config->read_scalar($conf_file,"$thisdir/config-in-test");
-
-WebCoso::Driver->run();
-
-my @resources=WebCoso::Config->get_all_resources();
-
-my @calls1=@{WebCoso::Pipeline::Test->_steps()->[0]->get_calls()};
-is(scalar @calls1,2,"2 chiamata a Step1");
-is($calls1[0]->{resource},
- $resources[0],
- 'risorsa giusta passata a Step1(1)');
-is($calls1[1]->{resource},
- $resources[0],
- 'risorsa giusta passata a Step1(2)');
-is($calls1[0]->{stage},
- 'meta',
- 'stage1==meta (step1)');
-is($calls1[1]->{stage},
- 'gen',
- 'stage2==gen (step1)');
-
-my @calls2=@{WebCoso::Pipeline::Test->_steps()->[1]->get_calls()};
-is(scalar @calls2,2,"2 chiamata a Step2");
-is($calls2[0]->{resource},
- $resources[0],
- 'risorsa giusta passata a Step2(1)');
-is($calls2[1]->{resource},
- $resources[0],
- 'risorsa giusta passata a Step2(2)');
-is($calls2[0]->{stage},
- 'meta',
- 'stage1==meta (step2)');
-is($calls2[1]->{stage},
- 'gen',
- 'stage2==gen (step2)');
-