diff options
author | ville <ville@localhost> | 2006-08-26 13:09:11 +0000 |
---|---|---|
committer | ville <ville@localhost> | 2006-08-26 13:09:11 +0000 |
commit | 6877ddb8232da96b3a869135a5673bed03d8ae88 (patch) | |
tree | 66f77fe1e8b9da94f947e35f944333a83abecea4 | |
parent | 5823c0d37ac4094f2f94fac8368cbc21e686cc76 (diff) | |
download | markup-validator-6877ddb8232da96b3a869135a5673bed03d8ae88.zip markup-validator-6877ddb8232da96b3a869135a5673bed03d8ae88.tar.gz markup-validator-6877ddb8232da96b3a869135a5673bed03d8ae88.tar.bz2 |
Include more environment variables in debug output.
-rwxr-xr-x | httpd/cgi-bin/check | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/httpd/cgi-bin/check b/httpd/cgi-bin/check index fa3f20f..65d16fc 100755 --- a/httpd/cgi-bin/check +++ b/httpd/cgi-bin/check @@ -14,7 +14,7 @@ # This source code is available under the license at: # http://www.w3.org/Consortium/Legal/copyright-software # -# $Id: check,v 1.462 2006-08-15 21:51:08 ville Exp $ +# $Id: check,v 1.463 2006-08-26 13:09:11 ville Exp $ # # Disable buffering on STDOUT! @@ -180,7 +180,7 @@ Directory not readable (permission denied): @_r # # Strings - $VERSION = q$Revision: 1.462 $; + $VERSION = q$Revision: 1.463 $; $VERSION =~ s/Revision: ([\d\.]+) /$1/; # @@ -609,6 +609,8 @@ sub parse (\$) { $T->param(opt_debug => $DEBUG); $T->param(debug => [ + map({name => $_, value => $ENV{$_}}, + qw(no_proxy http_proxy https_proxy ftp_proxy FTP_PASSIVE)), { name => 'Content-Encoding', value => $File->{ContentEnc} }, { name => 'Transfer-Encoding', value => $File->{TransferEnc} }, ], |