Change 34490 by [EMAIL PROTECTED] on 2008/10/15 18:23:56
One final tweak for the Test-Simple-0.82 upgrade. Ugh.
Affected files ...
... //depot/perl/MANIFEST#1735 edit
... //depot/perl/lib/Test/Simple/t/lib/SigDie.pm#1 branch
... //depot/perl/t/lib/SigDie.pm#2 delete
Differences ...
==== //depot/perl/MANIFEST#1735 (text) ====
Index: perl/MANIFEST
--- perl/MANIFEST#1734~34488~ 2008-10-15 07:32:01.000000000 -0700
+++ perl/MANIFEST 2008-10-15 11:23:56.000000000 -0700
@@ -2895,6 +2895,7 @@
lib/Test/Simple/t/lib/Dummy.pm Test::More test module
lib/Test/Simple/t/lib/MyOverload.pm Test::More test module
lib/Test/Simple/t/lib/NoExporter.pm Test::Simple test module
+lib/Test/Simple/t/lib/SigDie.pm Test module for Test::More
lib/Test/Simple/t/missing.t Test::Simple test, missing tests
lib/Test/Simple/t/More.t Test::More test, basic stuff
lib/Test/Simple/t/new_ok.t Test::More test
@@ -3758,7 +3759,6 @@
t/lib/no_load.t Test that some modules don't load others
t/lib/proxy_constant_subs.t Test that Proxy Constant Subs behave correctly
t/lib/Sans_mypragma.pm Test module for t/lib/mypragma.t
-t/lib/SigDie.pm Test module for Test::More
t/lib/strict/refs Tests of "use strict 'refs'" for strict.t
t/lib/strict/subs Tests of "use strict 'subs'" for strict.t
t/lib/strict/vars Tests of "use strict 'vars'" for strict.t
==== //depot/perl/lib/Test/Simple/t/lib/SigDie.pm#1 (text) ====
Index: perl/lib/Test/Simple/t/lib/SigDie.pm
--- /dev/null 2008-09-17 12:36:34.330355001 -0700
+++ perl/lib/Test/Simple/t/lib/SigDie.pm 2008-10-15 11:23:56.000000000
-0700
@@ -0,0 +1,6 @@
+package SigDie;
+
+use vars qw($DIE);
+$SIG{__DIE__} = sub { $DIE = $@ };
+
+1;
End of Patch.
