3 use Test::More tests => 2;
9 use lib "$FindBin::Bin/lib";
14 package Catalyst::Log::Unit;
15 use base qw/Catalyst::Log/;
19 use Catalyst::Test 'TestApp';
23 my $unit = Catalyst::Log::Unit->new;
27 TestApp->config->{Debug}->{redact_parameters} = [ 'and this' ];
29 TestApp->log_parameters(
30 'Query Parameters are',
32 'this is' => 'a unit test',
33 'and this' => 'is hidden'
37 my $body = $unit->_body;
39 like($body, qr/this is\s*\|\s*a unit test/);
40 like($body, qr/and this\s*\|\s*\(redacted by config\)/);