projects
/
catagits/Catalyst-Runtime.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(parent:
ba9ee3c
)
Replace bizarre split and join (that warns on undef values) with a simple regex
Dave Rolsky [Tue, 27 Sep 2011 15:10:41 +0000 (10:10 -0500)]
t/live_fork.t
patch
|
blob
|
blame
|
history
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) };
}