sync a bunch of files with Test::Simple 0.86

[p5sagit/p5-mst-13.2.git] / t / lib / Test / Simple / Catch.pm

diff --git a/t/lib/Test/Simple/Catch.pm b/t/lib/Test/Simple/Catch.pm
index 441a125..6f60493 100644 (file)
--- a/t/lib/Test/Simple/Catch.pm
+++ b/t/lib/Test/Simple/Catch.pm
@@ -1,9 +1,10 @@
 # For testing Test::Simple;
+# $Id$
 package Test::Simple::Catch;
 
 use Symbol;
 use TieOut;
-my($out_fh, $err_fh) = (gensym, gensym);
+my( $out_fh, $err_fh ) = ( gensym, gensym );
 my $out = tie *$out_fh, 'TieOut';
 my $err = tie *$err_fh, 'TieOut';
 
@@ -13,6 +14,6 @@ $t->output($out_fh);
 $t->failure_output($err_fh);
 $t->todo_output($err_fh);
 
-sub caught { return($out, $err) }
+sub caught { return( $out, $err ) }
 
 1;