From: Florian Ragwitz <rafl@debian.org>
Date: Tue, 8 Mar 2011 21:52:15 +0000 (+0100)
Subject: Avoid super long command lines when not aggregating
X-Git-Tag: 5.80033~35
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=a06394ac403562d4dc9912459582f4d2eab4c973;hp=0bf3b41caa076beabccbb8f486ffddc1991d4f81

Avoid super long command lines when not aggregating

This probably also fixes prove -lr t/, which people have been complaining about
every now and then.
---

diff --git a/Makefile.PL b/Makefile.PL
index 4a71977..857a643 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -64,10 +64,9 @@ if ($ENV{AGGREGATE_TESTS} && can_use('Test::Simple', '0.88') && can_use('Test::A
 }
 else {
     unlink '.aggregating';
-    tests join q{ },
-        grep { $_ ne 't/aggregate.t' }
-        map  { glob } qw[t/*.t t/aggregate/*.t];
+    tests 't/*.t t/aggregate/*.t';
 }
+
 author_requires 'CatalystX::LeakChecker', '0.05';
 author_requires 'File::Copy::Recursive'; # For http server test
 
diff --git a/t/aggregate.t b/t/aggregate.t
index 6722046..543fe02 100644
--- a/t/aggregate.t
+++ b/t/aggregate.t
@@ -5,6 +5,14 @@ use warnings;
 
 use FindBin;
 use lib "$FindBin::Bin/lib";
+use File::Spec::Functions 'catfile', 'updir';
+
+BEGIN {
+    unless (-e catfile $FindBin::Bin, updir, '.aggregating') {
+        require Test::More;
+        Test::More::plan(skip_all => 'No test aggregation requested');
+    }
+}
 
 BEGIN {
     unless (eval { require Test::Aggregate; Test::Aggregate->VERSION('0.364'); 1 }) {