diff options
author | E. Choroba <choroba@matfyz.cz> | 2020-07-27 11:32:51 +0200 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2020-07-30 15:52:38 -0600 |
commit | 589464a875768e4b4a609d972488e3b592103097 (patch) | |
tree | c49462051243e3a759527f6c6a2ff7bfec9ff9ff /lib | |
parent | b248789b64d6bd277c52bfe608ed3192023af1bd (diff) | |
download | perl-589464a875768e4b4a609d972488e3b592103097.tar.gz |
Clearing DB::action at the end is no longer needed
as it's cleared right after it's been run.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/perl5db.pl | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lib/perl5db.pl b/lib/perl5db.pl index e04a0e17fa..af3b972da0 100644 --- a/lib/perl5db.pl +++ b/lib/perl5db.pl @@ -3347,10 +3347,6 @@ use B<o> I<inhibit_exit> to avoid stopping after program termination, B<h q>, B<h R> or B<h o> to get additional info. EOP - # Set the DB::eval context appropriately. - # At program termination disable any user actions. - $DB::action = undef; - $DB::package = 'main'; $DB::usercontext = DB::_calc_usercontext($DB::package); } ## end elsif ($package eq 'DB::fake') |