X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2Flib%2FVariable%2FMagic%2FTestDieRequired.pm;fp=t%2Flib%2FVariable%2FMagic%2FTestDieRequired.pm;h=0000000000000000000000000000000000000000;hb=bf4c4354fb3bdfdd4d33501318ba3bdd382469c8;hp=50792b140d8f726e8146faeba7f79facca80aa93;hpb=ede9927507603e9db94fd3f5f31867b2f0fd0b87;p=perl%2Fmodules%2FVariable-Magic.git

diff --git a/t/lib/Variable/Magic/TestDieRequired.pm b/t/lib/Variable/Magic/TestDieRequired.pm
deleted file mode 100644
index 50792b1..0000000
--- a/t/lib/Variable/Magic/TestDieRequired.pm
+++ /dev/null
@@ -1,25 +0,0 @@
-package Variable::Magic::TestDieRequired;
-
-use Test::More;
-
-use Variable::Magic qw/wizard cast/;
-
-my $wiz;
-
-BEGIN {
- $wiz = wizard
-  data => sub { $_[1] },
-  free => sub { $_[1]->(); () };
-}
-
-sub hook (&) {
- $^H |= 0x020000;
- cast %^H, $wiz, shift;
-}
-
-BEGIN {
- hook { pass 'in Variable::Magic::TestRequired hook' };
- die 'turnip';
-}
-
-1;