From 0fcb900a2751dc472437a9bf643e285fd07ca203 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Wed, 9 Jan 2013 01:11:30 -0600 Subject: use the non-deprecated forms --- Changes | 1 + lib/circular/require.pm | 4 ++-- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/Changes b/Changes index 661199e..53816bd 100644 --- a/Changes +++ b/Changes @@ -1,6 +1,7 @@ Revision history for circular-require {{$NEXT}} + - stop using deprecated Package::Stash api 0.09 2012-01-07 - fix some bugs in require VERSION when circular::require is loaded diff --git a/lib/circular/require.pm b/lib/circular/require.pm index b6a5c95..5c0ee4b 100644 --- a/lib/circular/require.pm +++ b/lib/circular/require.pm @@ -150,10 +150,10 @@ sub unimport { @hide = map { /\.pm$/ ? $_ : _mod2pm($_) } @hide; my $stash = Package::Stash->new('CORE::GLOBAL'); - my $old_require = $stash->get_package_symbol('&require'); + my $old_require = $stash->get_symbol('&require'); $saved_require_hook = $old_require if defined($old_require) && $old_require != \&_require; - $stash->add_package_symbol('&require', \&_require); + $stash->add_symbol('&require', \&_require); $^H{'circular::require'} = 1; } -- cgit v1.2.3