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_autoflush.t;h=bb2aae5e22828ebe7049a3e54a893688b789e100;hp=530d47580a4ddb9c584acae221373e18c5416db4;hb=7ece4aaf8377247f5a9d6e5d9c811d4850533c3e;hpb=82010ea176741c7a4f2baf3f6f27377b1d9f6b15

diff --git a/t/aggregate/unit_core_log_autoflush.t b/t/aggregate/unit_core_log_autoflush.t
index 530d475..bb2aae5 100755
--- a/t/aggregate/unit_core_log_autoflush.t
+++ b/t/aggregate/unit_core_log_autoflush.t
@@ -35,7 +35,7 @@ like $MESSAGES[0], qr/^\[info\] hello there!$/,
 
 {
 
-    package Catalyst::Log::Subclass;
+    package Catalyst::Log::SubclassAutoflush;
     use base qw/Catalyst::Log/;
 
     sub _send_to_log {
@@ -47,9 +47,9 @@ like $MESSAGES[0], qr/^\[info\] hello there!$/,
 
 @MESSAGES = (); # clear the message log
 
-my $SUBCLASS = 'Catalyst::Log::Subclass';
+my $SUBCLASS = 'Catalyst::Log::SubclassAutoflush';
 can_ok $SUBCLASS, 'new';
-ok $log = Catalyst::Log::Subclass->new,
+ok $log = $SUBCLASS->new,
     '... and the log subclass constructor should return a new object';
 isa_ok $log, $SUBCLASS, '... and the object it returns';
 isa_ok $log, $LOG,      '... and it also';