diff options
-rwxr-xr-x | htdocs/index.html | 33 | ||||
-rwxr-xr-x | httpd/cgi-bin/check | 8 |
2 files changed, 22 insertions, 19 deletions
diff --git a/htdocs/index.html b/htdocs/index.html index 265446b..bd9cc87 100755 --- a/htdocs/index.html +++ b/htdocs/index.html @@ -75,21 +75,24 @@ <option>HTML 4.01 Frameset</option> <option>HTML 3.2</option> <option>HTML 2.0</option> - </select> + </select><br /> + Character Encoding: + <select name="charset"> + <option value="unknown">(Detect Automatically)</option> + <option value="us-ascii (as detected)">us-ascii (as detected)</option> + <option value="utf-8 (Unicode, worldwide)">utf-8 (Unicode, worldwide)</option> + <option value="iso-8859-1 (Western Europe)">iso-8859-1 (Western Europe)</option> + <option value="iso-8859-2 (Eastern Europe)">iso-8859-2 (Eastern Europe)</option> + <option value="iso-8859-5 (Cyrillic)">iso-8859-5 (Cyrillic)</option> + <option value="iso-8859-7 (Greek)">iso-8859-7 (Greek)</option> + <option value="euc-jp (Japanese, Unix)">euc-jp (Japanese, Unix)</option> + <option value="shift_jis (Japanese, Win/Mac)">shift_jis (Japanese, Win/Mac)</option> + <option value="iso-2022-jp (Japanese, email)">iso-2022-jp (Japanese, email)</option> + <option value="euc-kr (Korean)">euc-kr (Korean)</option> + <option value="GB2312 (Chinese, simplified)">GB2312 (Chinese, simplified)</option> + <option value="Big5 (Chinese, traditional)">Big5 (Chinese, traditional)</option> + </select> <table cellpadding="0" cellspacing="0"> - <!-- - <tr> - <td> - <input name="weblint" type="checkbox" value="" /> Include <a - href="http://www.weblint.org/">Weblint</a> - results - </td> - <td> - <input name="pw" type="checkbox" value="" /> run Weblint - in "pedantic" mode - </td> - </tr> - --> <tr> <td> <input name="ss" type="checkbox" value="" /> Show source input @@ -132,7 +135,7 @@ src="http://validator.w3.org/images/vxhtml10" height="31" width="88" align="right" border="0" alt="Valid XHTML 1.0!" /></a> <a href="/feedback.html">Gerald Oskoboiny</a><br /> - $Date: 2001-03-26 07:32:25 $ + $Date: 2001-07-26 12:29:30 $ </address> </body> diff --git a/httpd/cgi-bin/check b/httpd/cgi-bin/check index 58460b2..cf93ba9 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.162 2001-07-25 00:37:11 link Exp $ +# $Id: check,v 1.163 2001-07-26 12:29:30 link Exp $ # # We need Perl 5.004. @@ -80,9 +80,9 @@ my $element_ref = 'http://www.htmlhelp.com/reference/html40/'; # # Strings -$VERSION = q$Revision: 1.162 $; +$VERSION = q$Revision: 1.163 $; $VERSION =~ s/Revision: ([\d\.]+) /$1/; -$DATE = q$Date: 2001-07-25 00:37:11 $; +$DATE = q$Date: 2001-07-26 12:29:30 $; $MAINTAINER = 'gerald@w3.org'; $NOTICE = ''; # "<p><strong>Note: This service will be ...</strong>"; @@ -294,7 +294,7 @@ $File->{Type} = 'mathml' if $File->{DOCTYPE} =~ /mathml/i; # If we have a charset field in the request, we use it -if ($q->param('charset')) { +if ($q->param('charset') and not $q->param('charset') =~ m(unknown)i) { $q->param('charset') =~ /^([^ ]*)/; $File->{Form_Charset} = lc $1; } |