remove t/logsetup.pl and move feature into $ENV{OBJECT_REMOTE_TEST_LOGGER}; set to...
[scpubgit/Object-Remote.git] / t / logsetup.pl
CommitLineData
e5b3f03f 1#require this file in the test to initialize the logging framework
21988035 2#so the tests can run and all log items can be executed during testing
e5b3f03f 3
21988035 4package Object::Remote::Logging::TestOutput;
e5b3f03f 5
21988035 6use base qw ( Object::Remote::Logging::Logger );
e5b3f03f 7
21988035 8#don't need to output anything
9sub _output { }
e5b3f03f 10
11package main;
12
c3d5ef8a 13use Object::Remote::Logging qw( router );
e5b3f03f 14#make sure to enable execution of every logging code block
15#by setting the log level as high as it can go
c3d5ef8a 16router->connect(Object::Remote::Logging::TestOutput->new(
21988035 17 min_level => 'trace', max_level => 'error',
18 level_names => Object::Remote::Logging->arg_levels(),
19));
20
e5b3f03f 211;
22