diff options
author | dakkar <dakkar@luxion> | 2005-11-05 15:11:33 +0000 |
---|---|---|
committer | dakkar <dakkar@luxion> | 2005-11-05 15:11:33 +0000 |
commit | 2fc2d3eb7edf6ac03b9506b719758e9e6f13c7d3 (patch) | |
tree | 7c7e1e6bf88f0aa59cbaf095f0f476aa2a6a851a /t/lib | |
parent | aggiunta gestione pipeline e test relativi (diff) | |
download | WebCoso-2fc2d3eb7edf6ac03b9506b719758e9e6f13c7d3.tar.gz WebCoso-2fc2d3eb7edf6ac03b9506b719758e9e6f13c7d3.tar.bz2 WebCoso-2fc2d3eb7edf6ac03b9506b719758e9e6f13c7d3.zip |
migliorate le eccezioni, scritto Driver con test. Re #1
git-svn-id: svn://luxion/repos/WebCoso/trunk@22 fcb26f47-9200-0410-b104-b98ab5b095f3
Diffstat (limited to 't/lib')
-rw-r--r-- | t/lib/WebCoso/Pipeline/Test.pm | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/t/lib/WebCoso/Pipeline/Test.pm b/t/lib/WebCoso/Pipeline/Test.pm new file mode 100644 index 0000000..239d74b --- /dev/null +++ b/t/lib/WebCoso/Pipeline/Test.pm @@ -0,0 +1,17 @@ +package WebCoso::Pipeline::Test; +use strict; +use warnings; + +my @calls; + +sub process { + my ($class,$resource)=@_; + push @calls, { resource => $resource }; + return 1; +} + +sub get_calls { + return @calls; +} + +1; |