[Catalyst-commits] r9905 - Catalyst-Devel/1.00/branches/improved-restarter/lib/Catalyst

[autarch at dev.catalyst.perl.org]

Author: autarch
Date: 2009-04-28 02:49:09 +0100 (Tue, 28 Apr 2009)
New Revision: 9905

Modified:
   Catalyst-Devel/1.00/branches/improved-restarter/lib/Catalyst/Helper.pm
Log:
Turn off buffering when running under the test harness (it's a hack,
but better than just turning off buffering entirely).


Modified: Catalyst-Devel/1.00/branches/improved-restarter/lib/Catalyst/Helper.pm
===================================================================
--- Catalyst-Devel/1.00/branches/improved-restarter/lib/Catalyst/Helper.pm	2009-04-27 21:10:00 UTC (rev 9904)
+++ Catalyst-Devel/1.00/branches/improved-restarter/lib/Catalyst/Helper.pm	2009-04-28 01:49:09 UTC (rev 9905)
@@ -1003,6 +1003,10 @@
 # need to be reloaded for each restart.
 require Catalyst;
 
+# If this isn't done, then the Catalyst::Devel tests for the restarter
+# fail.
+$| = 1 if $ENV{HARNESS_ACTIVE};
+
 my $runner = sub {
     # This is require instead of use so that the above environment
     # variables can be set at runtime.