From: Graham Knop <haarg@haarg.org>
Date: Mon, 13 Feb 2017 08:59:34 +0000 (-0500)
Subject: use different package name in autoflush log test
X-Git-Tag: 5.90116~13
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7ece4aaf8377247f5a9d6e5d9c811d4850533c3e;p=catagits%2FCatalyst-Runtime.git

use different package name in autoflush log test

The log and log_autoflush tests were using duplicate packages for their
testing, so if they were run with Test::Aggregate it would cause
warnings and test failures.
---

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