From 4bf49f95bf425c9eb78fb618d52a5fe2fccdc1c0 Mon Sep 17 00:00:00 2001
From: Rocky Bernstein <rocky@cpan.org>
Date: Sun, 27 Apr 2014 09:44:18 -0400
Subject: [PATCH] Don't load source Enbugger and its sub-modules

---
 lib/Enbugger/trepan.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/Enbugger/trepan.pm b/lib/Enbugger/trepan.pm
index 7eb384d..4441144 100644
--- a/lib/Enbugger/trepan.pm
+++ b/lib/Enbugger/trepan.pm
@@ -39,7 +39,8 @@ BEGIN { @ISA = 'Enbugger' }
 sub _load_debugger {
     my ( $class ) = @_;
 
-    @Enbugger::ignore_module_pats = ('Devel/Trepan');
+    @Enbugger::ignore_module_pats =
+      qw(/Devel/Trepan /Enbugger/ /Enbugger.pm);
     $class->_compile_with_nextstate();
     require Devel::Trepan::Core;
     $^P |= 0x73f;
@@ -70,7 +71,7 @@ sub _stop {
     # trepan looks for these to stop.
     $DB::in_debugger = 1;
     $DB::signal = 2;
-    # Use at least the default debug flags and 
+    # Use at least the default debug flags and
     # eval string saving.
     $^P |= 0x73f;
     $DB::event = 'debugger-call';