Change 34484 by [EMAIL PROTECTED] on 2008/10/15 13:20:02
Some additional files changes for Test-Simple-0.82
Affected files ...
... //depot/perl/t/lib/Test/Simple/Catch.pm#5 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/death.plx#4 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/death_in_eval.plx#3 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/death_with_handler.plx#2 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/exit.plx#2 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/extras.plx#3 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/five_fail.plx#4 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/last_minute_death.plx#4 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/one_fail.plx#3 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/pre_plan_death.plx#2 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/require.plx#3 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/success.plx#3 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/too_few.plx#4 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/too_few_fail.plx#2 edit
... //depot/perl/t/lib/Test/Simple/sample_tests/two_fail.plx#3 edit
Differences ...
==== //depot/perl/t/lib/Test/Simple/Catch.pm#5 (text) ====
Index: perl/t/lib/Test/Simple/Catch.pm
--- perl/t/lib/Test/Simple/Catch.pm#4~23523~ 2004-11-20 14:17:18.000000000
-0800
+++ perl/t/lib/Test/Simple/Catch.pm 2008-10-15 06:20:02.000000000 -0700
@@ -1,9 +1,10 @@
# For testing Test::Simple;
+# $Id: /mirror/googlecode/test-more-trunk/t/lib/Test/Simple/Catch.pm 67132
2008-10-01T01:11:04.501643Z schwern $
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->failure_output($err_fh);
$t->todo_output($err_fh);
-sub caught { return($out, $err) }
+sub caught { return( $out, $err ) }
1;
==== //depot/perl/t/lib/Test/Simple/sample_tests/death.plx#4 (text) ====
Index: perl/t/lib/Test/Simple/sample_tests/death.plx
--- perl/t/lib/Test/Simple/sample_tests/death.plx#3~33394~ 2008-02-28
20:39:18.000000000 -0800
+++ perl/t/lib/Test/Simple/sample_tests/death.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
require Test::Simple;
+# $Id: /mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/death.plx
57943 2008-08-18T02:09:22.275428Z brooklyn.kid51 $
push @INC, 't/lib';
require Test::Simple::Catch;
==== //depot/perl/t/lib/Test/Simple/sample_tests/death_in_eval.plx#3 (text) ====
Index: perl/t/lib/Test/Simple/sample_tests/death_in_eval.plx
--- perl/t/lib/Test/Simple/sample_tests/death_in_eval.plx#2~11905~
2001-09-05 18:41:03.000000000 -0700
+++ perl/t/lib/Test/Simple/sample_tests/death_in_eval.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
require Test::Simple;
+# $Id:
/mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/death_in_eval.plx
57943 2008-08-18T02:09:22.275428Z brooklyn.kid51 $
use Carp;
push @INC, 't/lib';
==== //depot/perl/t/lib/Test/Simple/sample_tests/death_with_handler.plx#2
(text) ====
Index: perl/t/lib/Test/Simple/sample_tests/death_with_handler.plx
--- perl/t/lib/Test/Simple/sample_tests/death_with_handler.plx#1~33394~
2008-02-28 20:39:18.000000000 -0800
+++ perl/t/lib/Test/Simple/sample_tests/death_with_handler.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
require Test::Simple;
+# $Id:
/mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/death_with_handler.plx
57943 2008-08-18T02:09:22.275428Z brooklyn.kid51 $
push @INC, 't/lib';
require Test::Simple::Catch;
==== //depot/perl/t/lib/Test/Simple/sample_tests/exit.plx#2 (text) ====
Index: perl/t/lib/Test/Simple/sample_tests/exit.plx
--- perl/t/lib/Test/Simple/sample_tests/exit.plx#1~24401~ 2005-05-05
10:12:38.000000000 -0700
+++ perl/t/lib/Test/Simple/sample_tests/exit.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,3 +1,4 @@
require Test::Builder;
+# $Id: /mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/exit.plx
57943 2008-08-18T02:09:22.275428Z brooklyn.kid51 $
exit 1;
==== //depot/perl/t/lib/Test/Simple/sample_tests/extras.plx#3 (text) ====
Index: perl/t/lib/Test/Simple/sample_tests/extras.plx
--- perl/t/lib/Test/Simple/sample_tests/extras.plx#2~11905~ 2001-09-05
18:41:03.000000000 -0700
+++ perl/t/lib/Test/Simple/sample_tests/extras.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
require Test::Simple;
+# $Id: /mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/extras.plx
57943 2008-08-18T02:09:22.275428Z brooklyn.kid51 $
push @INC, 't/lib';
require Test::Simple::Catch;
==== //depot/perl/t/lib/Test/Simple/sample_tests/five_fail.plx#4 (text) ====
Index: perl/t/lib/Test/Simple/sample_tests/five_fail.plx
--- perl/t/lib/Test/Simple/sample_tests/five_fail.plx#3~12472~ 2001-10-17
04:00:54.000000000 -0700
+++ perl/t/lib/Test/Simple/sample_tests/five_fail.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
require Test::Simple;
+# $Id:
/mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/five_fail.plx 57943
2008-08-18T02:09:22.275428Z brooklyn.kid51 $
use lib 't/lib';
require Test::Simple::Catch;
==== //depot/perl/t/lib/Test/Simple/sample_tests/last_minute_death.plx#4 (text)
====
Index: perl/t/lib/Test/Simple/sample_tests/last_minute_death.plx
--- perl/t/lib/Test/Simple/sample_tests/last_minute_death.plx#3~33394~
2008-02-28 20:39:18.000000000 -0800
+++ perl/t/lib/Test/Simple/sample_tests/last_minute_death.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
require Test::Simple;
+# $Id:
/mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/last_minute_death.plx
57943 2008-08-18T02:09:22.275428Z brooklyn.kid51 $
push @INC, 't/lib';
require Test::Simple::Catch;
==== //depot/perl/t/lib/Test/Simple/sample_tests/one_fail.plx#3 (text) ====
Index: perl/t/lib/Test/Simple/sample_tests/one_fail.plx
--- perl/t/lib/Test/Simple/sample_tests/one_fail.plx#2~11905~ 2001-09-05
18:41:03.000000000 -0700
+++ perl/t/lib/Test/Simple/sample_tests/one_fail.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
require Test::Simple;
+# $Id:
/mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/one_fail.plx 57943
2008-08-18T02:09:22.275428Z brooklyn.kid51 $
push @INC, 't/lib';
require Test::Simple::Catch;
==== //depot/perl/t/lib/Test/Simple/sample_tests/pre_plan_death.plx#2 (text)
====
Index: perl/t/lib/Test/Simple/sample_tests/pre_plan_death.plx
--- perl/t/lib/Test/Simple/sample_tests/pre_plan_death.plx#1~17783~
2002-08-26 08:07:21.000000000 -0700
+++ perl/t/lib/Test/Simple/sample_tests/pre_plan_death.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
# ID 20020716.013, the exit code would become 0 if the test died
+# $Id:
/mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/pre_plan_death.plx
57943 2008-08-18T02:09:22.275428Z brooklyn.kid51 $
# before a plan.
require Test::Simple;
==== //depot/perl/t/lib/Test/Simple/sample_tests/require.plx#3 (text) ====
Index: perl/t/lib/Test/Simple/sample_tests/require.plx
--- perl/t/lib/Test/Simple/sample_tests/require.plx#2~11905~ 2001-09-05
18:41:03.000000000 -0700
+++ perl/t/lib/Test/Simple/sample_tests/require.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1 +1,2 @@
require Test::Simple;
+# $Id: /mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/require.plx
57943 2008-08-18T02:09:22.275428Z brooklyn.kid51 $
==== //depot/perl/t/lib/Test/Simple/sample_tests/success.plx#3 (text) ====
Index: perl/t/lib/Test/Simple/sample_tests/success.plx
--- perl/t/lib/Test/Simple/sample_tests/success.plx#2~11905~ 2001-09-05
18:41:03.000000000 -0700
+++ perl/t/lib/Test/Simple/sample_tests/success.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
require Test::Simple;
+# $Id: /mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/success.plx
57943 2008-08-18T02:09:22.275428Z brooklyn.kid51 $
push @INC, 't/lib';
require Test::Simple::Catch;
==== //depot/perl/t/lib/Test/Simple/sample_tests/too_few.plx#4 (text) ====
Index: perl/t/lib/Test/Simple/sample_tests/too_few.plx
--- perl/t/lib/Test/Simple/sample_tests/too_few.plx#3~25604~ 2005-09-26
09:31:43.000000000 -0700
+++ perl/t/lib/Test/Simple/sample_tests/too_few.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
require Test::Simple;
+# $Id: /mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/too_few.plx
57943 2008-08-18T02:09:22.275428Z brooklyn.kid51 $
push @INC, 't/lib';
require Test::Simple::Catch;
==== //depot/perl/t/lib/Test/Simple/sample_tests/too_few_fail.plx#2 (text) ====
Index: perl/t/lib/Test/Simple/sample_tests/too_few_fail.plx
--- perl/t/lib/Test/Simple/sample_tests/too_few_fail.plx#1~25604~
2005-09-26 09:31:43.000000000 -0700
+++ perl/t/lib/Test/Simple/sample_tests/too_few_fail.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
require Test::Simple;
+# $Id:
/mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/too_few_fail.plx
57943 2008-08-18T02:09:22.275428Z brooklyn.kid51 $
push @INC, 't/lib';
require Test::Simple::Catch;
@@ -9,4 +10,4 @@
ok(0);
ok(1);
-ok(0);
\ No newline at end of file
+ok(0);
==== //depot/perl/t/lib/Test/Simple/sample_tests/two_fail.plx#3 (text) ====
Index: perl/t/lib/Test/Simple/sample_tests/two_fail.plx
--- perl/t/lib/Test/Simple/sample_tests/two_fail.plx#2~11905~ 2001-09-05
18:41:03.000000000 -0700
+++ perl/t/lib/Test/Simple/sample_tests/two_fail.plx 2008-10-15
06:20:02.000000000 -0700
@@ -1,4 +1,5 @@
require Test::Simple;
+# $Id:
/mirror/googlecode/test-more/t/lib/Test/Simple/sample_tests/two_fail.plx 57943
2008-08-18T02:09:22.275428Z brooklyn.kid51 $
push @INC, 't/lib';
require Test::Simple::Catch;
End of Patch.