1 #require this file in the test to initialize the logging framework
4 package Object::Remote::Logger::TestOutput;
6 use base qw ( Log::Contextual::SimpleLogger );
8 #we want the code blocks in the log lines to execute but not
9 #output anything so turn this into a null logger
14 use Object::Remote::Logging qw( :log );
15 use Object::Remote::LogDestination;
16 #make sure to enable execution of every logging code block
17 #by setting the log level as high as it can go
18 my $____LOG_DESTINATION = Object::Remote::LogDestination->new(
19 logger => Object::Remote::Logger::TestOutput->new({ levels_upto => 'trace' }),
22 $____LOG_DESTINATION->connect(Object::Remote::Logging->arg_router);