麻烦混合TAP :: Harness构造函数args

时间:2013-01-29 07:18:05

标签: perl tap-harness

看起来有些TAP::Harness(v3.23)构造函数args不喜欢一起玩。

当我尝试指定formatter arg以及verbositycolor args时,模块会抱怨后两者无法识别。当我评论它时,它工作得很好。我做错了吗?

use strict;
use warnings;

use TAP::Harness;
use TAP::Formatter::HTML;

print "TAP::Harness Version : $TAP::Harness::VERSION\n";  # 3.23

my $fmt = TAP::Formatter::HTML->new;
   $fmt->output_file( 'test.html' );

my $harness = TAP::Harness
                ->new( {
                         color       => 1,
                         verbosity   => -2,
                         formatter   => $fmt,
                         lib         => $^O =~ /win/i
                                        ? [ 'C:\\some\\lib' ]
                                        : [ '/usr/bin/etc/some/lib' ],
                     } );

OUTPUT (指定了formatter arg):

Unknown arguments to TAP::Harness::new (color verbosity) at harness.pl line 41

1 个答案:

答案 0 :(得分:0)

所以看起来TAP::Formatter::HTML有自己的verbositycolor属性:

  

<强>冗长

$fmt->verbosity( [ $v ] )
     

详细级别,如TAP::Harness中的“新”中所定义:

1   verbose        Print individual test results (and more) to STDOUT.
 0   normal
-1   quiet          Suppress some test output (eg: test failures).
-2   really quiet   Suppress everything to STDOUT but the HTML report.
-3   silent         Suppress all output to STDOUT, including the HTML report.
     

<强>颜色

     

此方法仅适用于TAP::Harness API兼容性。确实如此   什么都没有。


因此,需要将参数传递给TAP::Formatter::HTML对象而不是线束。