From f253ff9ea6aad9021b3a0d15449e8097d348402a Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Tue, 29 Nov 2011 18:08:15 -0600 Subject: make sure we don't get warnings about redefining symbols --- lib/Package/Stash/PP.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'lib/Package/Stash/PP.pm') diff --git a/lib/Package/Stash/PP.pm b/lib/Package/Stash/PP.pm index 8d95840..a831564 100644 --- 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; } -- cgit v1.2.3-54-g00ecf