From cb8ebfeb3c38036bb8dd0b5b7d0fcd4274101ffa Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Mon, 19 Dec 2011 14:02:23 -0600
Subject: fix for use base (Exodist)

---
 lib/circular/require.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib')

diff --git a/lib/circular/require.pm b/lib/circular/require.pm
index 6a8c0be..7bc8552 100644
--- a/lib/circular/require.pm
+++ b/lib/circular/require.pm
@@ -61,7 +61,7 @@ sub _require {
         $mod =~ s+[/\\]+::+g;
         $mod =~ s+\.pm$++;
         $ret = $saved
-            ? $saved->($file) : eval "CORE::require($mod)";
+            ? $saved->($file) : do { eval "CORE::require $mod" || die $@ };
     }
     else {
         $ret = $saved ? $saved->($file) : CORE::require($file);
-- 
cgit v1.2.3-54-g00ecf