diff options
author | Ivan Kohler <ivan@freeside.biz> | 2014-08-21 00:48:07 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2014-08-21 00:48:07 -0700 |
commit | c71b2dc296da6207c525a064d322f7153c284d4e (patch) | |
tree | ddbc43665029b8b92db4e18b8198c7f848519010 /rt/lib/RT/Test.pm | |
parent | b95256aad16c4bdafd089d26c0f9147f3ec7755e (diff) |
rt 4.0.21 (RT#13852)
Diffstat (limited to 'rt/lib/RT/Test.pm')
-rw-r--r-- | rt/lib/RT/Test.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/rt/lib/RT/Test.pm b/rt/lib/RT/Test.pm index b15c03d23..19dc26378 100644 --- a/rt/lib/RT/Test.pm +++ b/rt/lib/RT/Test.pm @@ -1462,7 +1462,8 @@ sub test_app { } require Plack::Middleware::Test::StashWarnings; - my $stashwarnings = Plack::Middleware::Test::StashWarnings->new; + my $stashwarnings = Plack::Middleware::Test::StashWarnings->new( + $ENV{'RT_TEST_WEB_HANDLER'} && $ENV{'RT_TEST_WEB_HANDLER'} eq 'inline' ? ( verbose => 0 ) : () ); $app = $stashwarnings->wrap($app); if ($server_opt{basic_auth}) { @@ -1596,8 +1597,6 @@ sub file_content { $path = File::Spec->catfile( @$path ) if ref $path eq 'ARRAY'; - Test::More::diag "reading content of '$path'" if $ENV{'TEST_VERBOSE'}; - open( my $fh, "<:raw", $path ) or do { warn "couldn't open file '$path': $!" unless $args{noexist}; |