Amon2-Lite
view release on metacpan or search on metacpan
lib/Amon2/Setup/Flavor/Lite.pm view on Meta::CPAN
121122123124125126127128129130131132133134135136137138139140141142143144145146147148
$ENV
{PLACK_ENV} =
'test'
;
}
}
use
Test::More 0.96;
our
@EXPORT
=
qw//
;
{
# utf8 hack.
binmode
Test::More->builder->
$_
,
":utf8"
for
qw/output failure_output todo_output/
;
no
warnings
'redefine'
;
my
$code
= \
&Test::Builder::child
;
*Test::Builder::child
=
sub
{
my
$builder
=
$code
->(
@_
);
binmode
$builder
->output,
":utf8"
;
binmode
$builder
->failure_output,
":utf8"
;
binmode
$builder
->todo_output,
":utf8"
;
return
$builder
;
};
}
1;
...
$self
->write_file(
't/01_root.t'
, <<
'...'
);
use
strict;
use
warnings;
( run in 0.359 second using v1.01-cache-2.11-cpan-00829025b61 )