Changes entry

[p5sagit/Devel-Declare.git] / t / early0.t

diff --git a/t/early0.t b/t/early0.t
index 2f5c94f..41d7e7c 100644 (file)
--- a/t/early0.t
+++ b/t/early0.t
@@ -3,6 +3,7 @@ use warnings;
 use Test::More tests => 1;
 BEGIN {
     require Devel::Declare;
+    *class = sub (&) { $_[0]->() };
     Devel::Declare->setup_for(__PACKAGE__, {
         class => {
             const => sub {
@@ -13,9 +14,6 @@ BEGIN {
                 my $l = Devel::Declare::get_linestr();
                 substr $l, $off + 1, 0, 'pass q[injected];' . (';' x 1000);
                 Devel::Declare::set_linestr($l);
-                my $class = sub (&) { $_[0]->() };
-                no strict 'refs';
-                *{ $kw } = $class;
             },
         },
     });