diff options
Diffstat (limited to 'httpd/cgi-bin/check')
| -rwxr-xr-x | httpd/cgi-bin/check | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/httpd/cgi-bin/check b/httpd/cgi-bin/check index ab56220..15a6447 100755 --- a/httpd/cgi-bin/check +++ b/httpd/cgi-bin/check @@ -9,7 +9,7 @@ # This source code is available under the license at: # http://www.w3.org/Consortium/Legal/copyright-software # -# $Id: check,v 1.218 2002-08-30 06:47:12 duerst Exp $ +# $Id: check,v 1.219 2002-08-30 07:07:55 duerst Exp $ # # Disable buffering on STDOUT! @@ -97,7 +97,7 @@ BEGIN { # # Strings - $VERSION = q$Revision: 1.218 $; + $VERSION = q$Revision: 1.219 $; $VERSION =~ s/Revision: ([\d\.]+) /$1/; @@ -153,7 +153,7 @@ $File->{'Header'} = &prepSSI({ }); $File->{'Footer'} = &prepSSI({ File => $CFG->{'Footer'}, - Date => q$Date: 2002-08-30 06:47:12 $, + Date => q$Date: 2002-08-30 07:07:55 $, }); # @@ -208,6 +208,7 @@ $File->{Opt}->{'Show ESIS'} = $q->param('esis') ? TRUE $File->{Opt}->{'Show Errors'} = $q->param('errors') ? TRUE : FALSE; $File->{Opt}->{'Verbose'} = $q->param('verbose') ? TRUE : FALSE; $File->{Opt}->{'Debug'} = $q->param('debug') ? TRUE : FALSE; +$File->{Opt}->{'No200'} = $q->param('No200') ? TRUE : FALSE; $File->{Opt}->{'Charset'} = $q->param('charset') ? lc $q->param('charset'): ''; $File->{Opt}->{'DOCTYPE'} = $q->param('doctype') ? $q->param('doctype') : ''; $File->{Opt}->{'URI'} = $q->param('uri') ? $q->param('uri') : ''; @@ -1110,7 +1111,7 @@ sub handle_uri { my $res = $ua->request($req); - unless ($res->code == 200) { + unless ($res->code == 200 || $File->{Opt}->{'No200'}) { if ($res->code == 401) { &authenticate($File, $res->request->url, $res->www_authenticate); } else { |