diff options
| author | Frédéric Buclin <LpSolit@gmail.com> | 2016-01-07 01:43:45 +0100 |
|---|---|---|
| committer | Frédéric Buclin <LpSolit@gmail.com> | 2016-01-07 01:43:45 +0100 |
| commit | 76fd2f8984309af7331c470d9340e03dcadae56f (patch) | |
| tree | e345c2978a9d2a176fe3fcdadc0747e4ef35b61d /Bugzilla.pm | |
| parent | 2e0038dcb48f1e159520d093033db791483b0e63 (diff) | |
| download | bugzilla-76fd2f8984309af7331c470d9340e03dcadae56f.tar.gz bugzilla-76fd2f8984309af7331c470d9340e03dcadae56f.tar.xz | |
Addl. fix for bug 1089448: also detaint $ENV{WINDIR} on Windows
Diffstat (limited to 'Bugzilla.pm')
| -rw-r--r-- | Bugzilla.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Bugzilla.pm b/Bugzilla.pm index 16075b2d1..221a64f76 100644 --- a/Bugzilla.pm +++ b/Bugzilla.pm @@ -90,7 +90,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, |