X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Faggregate%2Funit_core_log.t;fp=t%2Funit_core_log.t;h=c86aa82fac7d9212d598e246ef07d8c03c264dc5;hp=26a52d321407149d1cd2eb66b313c45f4dfea0dd;hb=5d50f369bffa3625ca983b72fc8bc013c8a1e802;hpb=a2aac3b8867dea286d03eba07a6fbe2e237cf1ae

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
--- 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';