summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorE. Choroba <choroba@matfyz.cz>2020-07-27 11:32:51 +0200
committerKarl Williamson <khw@cpan.org>2020-07-30 15:52:38 -0600
commit589464a875768e4b4a609d972488e3b592103097 (patch)
treec49462051243e3a759527f6c6a2ff7bfec9ff9ff /lib
parentb248789b64d6bd277c52bfe608ed3192023af1bd (diff)
downloadperl-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.pl4
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')