From 3d4fd403e7a62181ee0d40823c8991628481c6cd Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Sun, 21 Jul 2013 00:03:57 -0400
Subject: reset PL_curcop when we're about to start compiling again

---
 Keyword.xs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Keyword.xs b/Keyword.xs
index a2a4aa1..cc62542 100644
--- a/Keyword.xs
+++ b/Keyword.xs
@@ -93,6 +93,7 @@ parse_block()
     I32 floor;
     CV *code;
   CODE:
+    PL_curcop = &PL_compiling;
     floor = start_subparse(0, CVf_ANON);
     code = newATTRSUB(floor, NULL, NULL, NULL, parse_block(0));
     if (CvCLONE(code)) {
-- 
cgit v1.2.3-54-g00ecf