From 948efbf576d8799d1089ed240c31c8c0b6d42e14 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Thu, 3 Jan 2013 23:56:51 -0600
Subject: need to handle BROKEN_ISA_ASSIGNMENT here too

---
 lib/Package/Stash/PP.pm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/lib/Package/Stash/PP.pm b/lib/Package/Stash/PP.pm
index f9b81c0..c709400 100644
--- a/lib/Package/Stash/PP.pm
+++ b/lib/Package/Stash/PP.pm
@@ -178,7 +178,13 @@ sub add_symbol {
         }
         else {
             no strict 'refs';
-            *{ $self->name . '::' . $name } = $self->_undef_ref_for_type($type);
+            if (BROKEN_ISA_ASSIGNMENT && $name eq 'ISA') {
+                *{ $self->name . '::' . $name };
+            }
+            else {
+                my $undef = $self->_undef_ref_for_type($type);
+                *{ $self->name . '::' . $name } = $undef;
+            }
         }
     }
     else {
-- 
cgit v1.2.3