From 422c59bf485ce57586a2a1e15602d42cac4d2612 Mon Sep 17 00:00:00 2001
From: Duke Leto <jonathan@leto.net>
Date: Thu, 4 Jun 2009 16:11:42 -0700
Subject: Fix my comment about DB::sub and make it DB::DB

---
 lib/perl5db.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/perl5db.pl b/lib/perl5db.pl
index e7ec200234..03ef2a2c6b 100644
--- a/lib/perl5db.pl
+++ b/lib/perl5db.pl
@@ -1056,7 +1056,7 @@ warn(               # Do not ;-)
   )
   if 0;
 
-# without threads, $filename is not defined until DB::sub is called
+# without threads, $filename is not defined until DB::DB is called
 foreach my $k (keys (%INC)) {
 	&share(\$main::{'_<'.$filename}) if defined $filename;
 };
-- 
cgit v1.2.1