aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFrédéric Buclin <LpSolit@gmail.com>2016-01-07 01:45:27 +0100
committerFrédéric Buclin <LpSolit@gmail.com>2016-01-07 01:45:27 +0100
commita28da9f20a7837b6d620235809d4f21583c23bdb (patch)
tree84f07eab8c02f754c253c8de4c09790705799552
parent6e6093a1ea2e44df70c1689e454a24c71cc33e54 (diff)
downloadbugs-a28da9f20a7837b6d620235809d4f21583c23bdb.tar
bugs-a28da9f20a7837b6d620235809d4f21583c23bdb.tar.gz
bugs-a28da9f20a7837b6d620235809d4f21583c23bdb.tar.bz2
bugs-a28da9f20a7837b6d620235809d4f21583c23bdb.tar.xz
bugs-a28da9f20a7837b6d620235809d4f21583c23bdb.zip
Addl. fix for bug 1089448: also detaint $ENV{WINDIR} on Windows
-rw-r--r--Bugzilla.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/Bugzilla.pm b/Bugzilla.pm
index aa78f1483..9cb15a7ee 100644
--- a/Bugzilla.pm
+++ b/Bugzilla.pm
@@ -87,7 +87,7 @@ sub init_page {
# On Windows, these paths are tainted, preventing
# File::Spec::Win32->tmpdir from using them. But we need
# a place to temporary store attachments which are uploaded.
- foreach my $temp (qw(TMPDIR TMP TEMP)) {
+ foreach my $temp (qw(TMPDIR TMP TEMP WINDIR)) {
trick_taint($ENV{$temp}) if $ENV{$temp};
}
# Some DLLs used by Strawberry Perl are also in c\bin,