Front page | perl.perl5.porters |
Postings from May 2001
Another little warnings patch. This one eliminates the unused junk
variable. The SvPV macro seems to work just fine stand-alone.
--- pp_sys.c 2001/05/30 10:36:24 1.1
+++ pp_sys.c 2001/05/30 10:36:44
@@ -3970,7 +3970,7 @@
if (SP - MARK == 1) {
if (PL_tainting) {
- char *junk = SvPV(TOPs, n_a);
+ SvPV(TOPs, n_a);
TAINT_ENV();
TAINT_PROPER("system");
}
@@ -4096,7 +4096,7 @@
#endif
else {
if (PL_tainting) {
- char *junk = SvPV(*SP, n_a);
+ SvPV(*SP, n_a);
TAINT_ENV();
TAINT_PROPER("exec");
}
--
Michael G. Schwern <schwern@pobox.com> http://www.pobox.com/~schwern/
Perl6 Quality Assurance <perl-qa@perl.org> Kwalitee Is Job One
I have no choice but be brave and face the danger and laughter! So please don't
email me insults. If I don't deserve your belief, at least I deserve your
respect.
--Alex Chiu, Immortality Guy
Thread Next