X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Flib%2FRT%2FTest.pm;h=19dc263782ee476cffdeb5759d5daf4d3f2dd565;hb=008524b8e963831999983769f7fec11f55a72f16;hp=b15c03d2303024a54a765db313e86bc2d9a7dac4;hpb=d10fe3d48da3f3bdb423efe42d624e9d1013c958;p=freeside.git 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};