[patch sv.h api doc] SvTAINTED_on does its craft only under -T

Message-ID: <3F4FEBBD.8000901@stason.org>

p4raw-id: //depot/perl@20941

diff --git a/pod/perlapi.pod b/pod/perlapi.pod
index 96766c1..d52baf2 100644 (file)
--- a/pod/perlapi.pod
+++ b/pod/perlapi.pod
@@ -3309,7 +3309,7 @@ Found in file sv.h
 
 =item SvTAINT
 
-Taints an SV if tainting is enabled
+Taints an SV if tainting is enabled.
 
        void    SvTAINT(SV* sv)
 
@@ -3342,7 +3342,7 @@ Found in file sv.h
 
 =item SvTAINTED_on
 
-Marks an SV as tainted.
+Marks an SV as tainted if tainting is enabled.
 
        void    SvTAINTED_on(SV* sv)
 

diff --git a/sv.h b/sv.h
index 42649be..ebdb2dd 100644 (file)
--- a/sv.h
+++ b/sv.h
@@ -803,7 +803,7 @@ Checks to see if an SV is tainted. Returns TRUE if it is, FALSE if
 not.
 
 =for apidoc Am|void|SvTAINTED_on|SV* sv
-Marks an SV as tainted.
+Marks an SV as tainted if tainting is enabled.
 
 =for apidoc Am|void|SvTAINTED_off|SV* sv
 Untaints an SV. Be I<very> careful with this routine, as it short-circuits
@@ -814,7 +814,7 @@ standard perl fashion, via a carefully crafted regexp, rather than directly
 untainting variables.
 
 =for apidoc Am|void|SvTAINT|SV* sv
-Taints an SV if tainting is enabled
+Taints an SV if tainting is enabled.
 
 =cut
 */