Change 11457 by jhi@alpha on 2001/07/23 21:22:36
Subject: [PATCH 5.7.2] debug reloading selfloaded stuff
From: Ilya Zakharevich <[EMAIL PROTECTED]>
Date: Mon, 23 Jul 2001 18:13:20 -0400
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/lib/perl5db.pl#64 edit
Differences ...
==== //depot/perl/lib/perl5db.pl#64 (text) ====
Index: perl/lib/perl5db.pl
--- perl/lib/perl5db.pl.~1~ Mon Jul 23 15:30:05 2001
+++ perl/lib/perl5db.pl Mon Jul 23 15:30:05 2001
@@ -1226,7 +1226,7 @@
*dbline = $main::{'_<' . $file};
next unless %dbline or $postponed_file{$file};
(push @hard, $file), next
- if $file =~ /^\(eval \d+\)$/;
+ if $file =~ /^\(\w*eval/;
my @add;
@add = %{$postponed_file{$file}}
if $postponed_file{$file};
End of Patch.
