t/simplelogger.t

   1 use strict;
   2 use warnings;
   3
   4 use Log::Contextual::SimpleLogger;
   5 use Log::Contextual qw{:log} => -logger =>
   6    Log::Contextual::SimpleLogger->new({levels => [qw{debug}]});
   7 use Test::More qw(no_plan);
   8 my $l = Log::Contextual::SimpleLogger->new({levels => [qw{debug}]});
   9
  10 ok($l->is_debug, 'is_debug is true on SimpleLogger');
  11
  12 log_debug { 'set_logger' };
  13 log_trace { die 'this should live' };