summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2012-01-06 11:07:33 -0600
committerJesse Luehrs <doy@tozt.net>2012-01-06 11:08:05 -0600
commite17323538f7f49e7371f5e92bd2ab87f6a838e7d (patch)
tree9348debfc217a9e0373c205f2fe70d12753ff9d2
parent91ab43aad7017b407f112aee88acfc66fad4f4fd (diff)
downloadcircular-require-e17323538f7f49e7371f5e92bd2ab87f6a838e7d.tar.gz
circular-require-e17323538f7f49e7371f5e92bd2ab87f6a838e7d.zip
stop loading B on demand
-rw-r--r--Changes1
-rw-r--r--lib/circular/require.pm4
2 files changed, 4 insertions, 1 deletions
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)