summaryrefslogtreecommitdiff
path: root/lib/perl5db.pl
diff options
context:
space:
mode:
authorPeter Scott <Peter@PSDT.com>2002-02-08 11:20:19 -0800
committerJarkko Hietaniemi <jhi@iki.fi>2002-02-09 16:12:03 +0000
commit963d69e8bb2ad35135b1d01b9ccda4272de0af1f (patch)
tree455d3a4668a03c319309cc1e43d7a2f2043d41fd /lib/perl5db.pl
parent83ded9ee47521e42aa903a8906202ae2516dedeb (diff)
downloadperl-963d69e8bb2ad35135b1d01b9ccda4272de0af1f.tar.gz
perl5db.pl: restart in taint mode
Message-id: <4.3.2.7.2.20020208191757.00b4cea0@shell2.webquarry.com> p4raw-id: //depot/perl@14610
Diffstat (limited to 'lib/perl5db.pl')
-rw-r--r--lib/perl5db.pl1
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/perl5db.pl b/lib/perl5db.pl
index b62ac8b5e5..2a8b2bfa2c 100644
--- a/lib/perl5db.pl
+++ b/lib/perl5db.pl
@@ -1244,6 +1244,7 @@ EOP
for (@ini_INC) {
push @flags, '-I', $_;
}
+ push @flags, '-T' if ${^TAINT};
# Arrange for setting the old INC:
set_list("PERLDB_INC", @ini_INC);
if ($0 eq '-e') {