make sure we don't get warnings about redefining symbols

[gitmo/Package-Stash.git] / lib / Package / Stash / PP.pm

diff --git a/lib/Package/Stash/PP.pm b/lib/Package/Stash/PP.pm
index 8d95840..a831564 100644 (file)
--- a/lib/Package/Stash/PP.pm
+++ b/lib/Package/Stash/PP.pm
@@ -185,6 +185,7 @@ sub add_symbol {
         $namespace->{$name} ||= *{ Symbol::gensym() };
 
         if (@_ > 2) {
+            no warnings 'redefine';
             *{ $namespace->{$name} } = ref $initial_value
                 ? $initial_value : \$initial_value;
         }