Merge branch 'master' into gsoc_breadboard

[catagits/Catalyst-Runtime.git] / t / live_fork.t

diff --git a/t/live_fork.t b/t/live_fork.t
index c5785a3..9c053e3 100644 (file)
--- a/t/live_fork.t
+++ b/t/live_fork.t
@@ -60,8 +60,7 @@ sub result_ok {
     unlike( $result, qr/FATAL/, 'result is not an error' )
         or return;
 
-    my @result = split /$/m, $result;
-    $result = join q{}, @result[-4..-1];
+    $result =~ s/\r\n|\r/\n/g;
 
     return eval { Load($result) };
 }