From 1aa95f301e5cbc44bf07782627f1e1d6fc7ed963 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Thu, 3 Jan 2013 23:55:05 -0600
Subject: need to handle assignment in the BROKEN_GLOB_ASSIGNMENT case too

---
 lib/Package/Stash/PP.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/Package/Stash/PP.pm')

diff --git a/lib/Package/Stash/PP.pm b/lib/Package/Stash/PP.pm
index b8f3ed9..f9b81c0 100644
--- a/lib/Package/Stash/PP.pm
+++ b/lib/Package/Stash/PP.pm
@@ -178,7 +178,7 @@ sub add_symbol {
         }
         else {
             no strict 'refs';
-            *{ $self->name . '::' . $name };
+            *{ $self->name . '::' . $name } = $self->_undef_ref_for_type($type);
         }
     }
     else {
-- 
cgit v1.2.3-54-g00ecf