r8342@foo: jon | 2006-12-16 02:49:32 -0600
[catagits/Catalyst-Runtime.git] / t / live_fork.t
index 5871dcb..0dfe7f5 100644 (file)
@@ -26,8 +26,7 @@ plan tests => 13; # otherwise
     
     my $result_ref = eval { Load($result) };
     ok($result_ref, 'is YAML');
-    is($result_ref->{code}, 0, 'exited successfully');
-    like($result_ref->{result}, qr{^/bin/ls[^:]}, 'contains ^/bin/ls$');
+    is($result_ref->{result}, 0, 'exited OK');
 }
 
 { 
@@ -40,6 +39,7 @@ plan tests => 13; # otherwise
     ok($result_ref, 'is YAML');
     is($result_ref->{code}, 0, 'exited successfully');
     like($result_ref->{result}, qr{^/bin/ls[^:]}, 'contains ^/bin/ls$');
+    like($result_ref->{result}, qr{\n.*\n}m, 'contains two newlines');
 }
 { 
   fork: