From 1dbad523dc291b9627b38bb8a90cb8baa1d2b369 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Tue, 25 Dec 2001 16:20:19 +0000 Subject: Make -t equal -tw. p4raw-id: //depot/perl@13884 --- perl.c | 6 ++++-- pod/perlrun.pod | 12 +++++++----- 2 files changed, 11 insertions(+), 7 deletions(-) diff --git a/perl.c b/perl.c index d75b20dff7..50e7aa1bcb 100644 --- a/perl.c +++ b/perl.c @@ -1099,8 +1099,10 @@ S_parse_body(pTHX_ char **env, XSINIT_t xsinit) goto reswitch; break; - case 't': - PL_taint_warn = TRUE; + case 't': + PL_taint_warn = TRUE; + if (! (PL_dowarn & G_WARN_ALL_MASK)) + PL_dowarn |= G_WARN_ON; case 'T': PL_tainting = TRUE; s++; diff --git a/pod/perlrun.pod b/pod/perlrun.pod index 2b7cca11ce..137ecd30d8 100644 --- a/pod/perlrun.pod +++ b/pod/perlrun.pod @@ -700,11 +700,13 @@ program will be searched for strictly on the PATH. =item B<-t> Like B<-T>, but taint checks will issue warnings rather than fatal -errors. Since these are warnings, the B<-w> switch (or C) must be used along with this option. B This is meant only to be used as a temporary -aid while securing legacy code: for real production code and for new -secure code written from scratch always use the real B<-T>. +errors. Also, all warnings are turned on as if you had used also +a B<-w>. + +B This is meant only to be +used as a temporary development aid while securing legacy code: +for real production code and for new secure code written from scratch +always use the real B<-T>. =item B<-T> -- cgit v1.2.1