diff options
| author | Ilya Zakharevich <ilya@math.berkeley.edu> | 2001-07-23 14:13:20 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-23 21:22:36 +0000 |
| commit | f41f30cfa10bebb4c8cf186444edce3f3f1826ca (patch) | |
| tree | 80df1b55bbd57ac1f34a34db5d49bc04a97ea7ae /lib/perl5db.pl | |
| parent | a933f6011129fbd383aba331534ef87e35eeff2f (diff) | |
| download | perl-f41f30cfa10bebb4c8cf186444edce3f3f1826ca.tar.gz | |
debug reloading selfloaded stuff
Message-ID: <20010723181320.A14005@math.ohio-state.edu>
p4raw-id: //depot/perl@11457
Diffstat (limited to 'lib/perl5db.pl')
| -rw-r--r-- | lib/perl5db.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/perl5db.pl b/lib/perl5db.pl index 1c20f576d4..ab9c48da60 100644 --- a/lib/perl5db.pl +++ b/lib/perl5db.pl @@ -1226,7 +1226,7 @@ EOP *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}; |