More aggregated tests.

[catagits/Catalyst-Runtime.git] / t / aggregate / unit_core_log.t

diff --git a/t/unit_core_log.t b/t/aggregate/unit_core_log.t
similarity index 93%
rename from t/unit_core_log.t
rename to t/aggregate/unit_core_log.t
index 26a52d3..c86aa82 100644 (file)
--- a/t/unit_core_log.t
+++ b/t/aggregate/unit_core_log.t
@@ -3,14 +3,10 @@ use warnings;
 
 use Test::More tests => 23;
 
-my $LOG;
+use Catalyst::Log;
+
+local *Catalyst::Log::_send_to_log;
 
-BEGIN {
-    chdir 't' if -d 't';
-    use lib '../lib';
-    $LOG = 'Catalyst::Log';
-    use_ok $LOG or die;
-}
 my @MESSAGES;
 {
     no warnings 'redefine';
@@ -20,6 +16,8 @@ my @MESSAGES;
     };
 }
 
+my $LOG = 'Catalyst::Log';
+
 can_ok $LOG, 'new';
 ok my $log = $LOG->new, '... and creating a new log object should succeed';
 isa_ok $log, $LOG, '... and the object it returns';