get rid of fun stuff

diff --git a/t/lib/WarnLogger.pm b/t/lib/WarnLogger.pm
deleted file mode 100644 (file)
index b64f540..0000000
--- a/t/lib/WarnLogger.pm
+++ /dev/null
@@ -1,12 +0,0 @@
-package WarnLogger;
-
-use POSIX qw(strftime);
-sub new { bless {}, __PACKAGE__ }
-sub debug {
-   my @caller = caller(1);
-   my $time = strftime "%y-%m-%d %H:%M:%S", localtime;
-   warn "[$time][$caller[0]][$caller[1]][$caller[2]][$_[1]]\n"
-}
-sub is_debug { 1 }
-
-1;

diff --git a/t/play.t b/t/play.t
deleted file mode 100644 (file)
index d1add5e..0000000
--- a/t/play.t
+++ /dev/null
@@ -1,17 +0,0 @@
-use strict;
-use warnings;
-
-use lib 't/lib';
-use WarnLogger;
-use Log::Contextual;
-use Test::More qw(no_plan);
-
-my $logger =  WarnLogger->new;
-
-set_logger { $logger };
-log_debug { 'set_logger' };
-log_debug { 'simple log 1' };
-log_debug { 'simple log 2' };
-sleep 1;
-log_debug { 'simple log 3' };
-