Rename Variable::Magic::TestDieRequired to Variable::Magic::TestScopeEnd

[perl/modules/Variable-Magic.git] / t / lib / Variable / Magic / TestDieRequired.pm

diff --git a/t/lib/Variable/Magic/TestDieRequired.pm b/t/lib/Variable/Magic/TestDieRequired.pm
deleted file mode 100644 (file)
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;