From: Florian Ragwitz <rafl@debian.org>
Date: Sun, 19 Oct 2008 07:50:00 +0000 (+0000)
Subject: Remove unused inject_scope from method.t
X-Git-Tag: 0.005000~60
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0be3860b25f7dd4c0a71775a4c561b95415e64c4;hp=7347020e4f34c9d326251240afb50afed8a1e808;p=p5sagit%2FDevel-Declare.git

Remove unused inject_scope from method.t
---

diff --git a/t/method.t b/t/method.t
index 9833e30..7335635 100644
--- a/t/method.t
+++ b/t/method.t
@@ -91,16 +91,6 @@ use Devel::Declare ();
       shadow(sub (&) { shift });
     }
   }
-
-  sub inject_scope {
-    $^H |= 0x120000;
-    $^H{DD_METHODHANDLERS} = Scope::Guard->new(sub {
-      my $linestr = Devel::Declare::get_linestr;
-      my $offset = Devel::Declare::get_linestr_offset;
-      substr($linestr, $offset, 0) = ';';
-      Devel::Declare::set_linestr($linestr);
-    });
-  }
 }
 
 my ($test_method1, $test_method2, @test_list);