From e17323538f7f49e7371f5e92bd2ab87f6a838e7d Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Fri, 6 Jan 2012 11:07:33 -0600 Subject: stop loading B on demand --- Changes | 1 + lib/circular/require.pm | 4 +++- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/Changes b/Changes index 94d3446..7845c37 100644 --- a/Changes +++ b/Changes @@ -1,6 +1,7 @@ Revision history for circular-require {{$NEXT}} + - loading B on demand causes issues, stop doing that 0.07 2012-01-06 - make this module use dynamic scope rather than being entirely global diff --git a/lib/circular/require.pm b/lib/circular/require.pm index f80c035..881aec7 100644 --- a/lib/circular/require.pm +++ b/lib/circular/require.pm @@ -4,6 +4,9 @@ use warnings; # ABSTRACT: detect circularity in use/require statements use Package::Stash; +# XXX would be nice to load this on demand, but "on demand" is within the +# require override, which causes a mess (on pre-5.14) +use B; =head1 SYNOPSIS @@ -110,7 +113,6 @@ sub _require { # but we're not in an eval anymore # fake it up so that this looks the same if (defined((caller(1))[6])) { - require B; my $str = B::perlstring($file); $ret = $saved_require_hook ? $saved_require_hook->($file) -- cgit v1.2.3