From bca9865190a06f363601baceeb803d555f55ff77 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Fri, 5 Aug 2011 13:04:49 -0500
Subject: regexprefs are valid scalar refs too

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

(limited to 'lib')

diff --git a/lib/Package/Stash/PP.pm b/lib/Package/Stash/PP.pm
index fdb8da9..52753c2 100644
--- a/lib/Package/Stash/PP.pm
+++ b/lib/Package/Stash/PP.pm
@@ -105,7 +105,7 @@ sub _valid_for_type {
     }
     else {
         my $ref = reftype($value);
-        return !defined($ref) || $ref eq 'SCALAR' || $ref eq 'REF' || $ref eq 'LVALUE';
+        return !defined($ref) || $ref eq 'SCALAR' || $ref eq 'REF' || $ref eq 'LVALUE' || $ref eq 'REGEXP';
     }
 }
 
-- 
cgit v1.2.3-54-g00ecf