commit 598b16df87edde615ae94dc9e8b6f96000aaa3a6
parent 4eda4d015289e6bd6c838166928218a278e5c65c
Author: ukai <ukai>
Date: Mon, 22 Mar 2004 17:03:13 +0000
* scripts/w3mhelp.cgi.in: use charset parramter
* scripts/w3mhelp-funcdesc.en.pl.in: add charset
* scripts/w3mhelp-funcdesc.ja.pl.in: ditto
From: Fumitoshi UKAI <ukai@debian.or.jp>
Diffstat:
4 files changed, 13 insertions(+), 2 deletions(-)
diff --git a/ChangeLog b/ChangeLog
@@ -1,3 +1,9 @@
+2004-03-23 Fumitoshi UKAI <ukai@debian.or.jp>
+
+ * scripts/w3mhelp.cgi.in: use charset parramter
+ * scripts/w3mhelp-funcdesc.en.pl.in: add charset
+ * scripts/w3mhelp-funcdesc.ja.pl.in: ditto
+
2004-03-22 Fumitoshi UKAI <ukai@debian.or.jp>
* main.c (main): don't use SystemCharset for default of
diff --git a/scripts/w3mhelp-funcdesc.en.pl.in b/scripts/w3mhelp-funcdesc.en.pl.in
@@ -1,3 +1,5 @@
+# charset
+$charset = 'US-ASCII';
# Buffer selection mode
diff --git a/scripts/w3mhelp-funcdesc.ja.pl.in b/scripts/w3mhelp-funcdesc.ja.pl.in
@@ -1,3 +1,5 @@
+# charset
+$charset = 'EUC-JP';
# Buffer selection mode
diff --git a/scripts/w3mhelp.cgi.in b/scripts/w3mhelp.cgi.in
@@ -16,6 +16,7 @@ unshift(@INC, $helpdir);
require "w3mhelp-funcname.pl";
require "w3mhelp-funcdesc.en.pl";
$lang = 'en';
+$charset = 'US-ASCII';
%htmlesc = (
'<', '<',
@@ -44,7 +45,7 @@ if (defined($ENV{'QUERY_STRING'})) {
if ($tlang !~ /^[a-z][a-z]$/) {
$tlang = 'en';
}
- print "tlang=$tlang\n";
+ # print "tlang=$tlang\n";
eval {require "w3mhelp-funcdesc.$tlang.pl";};
if (defined(%funcdesc)) {
$lang = $tlang;
@@ -89,7 +90,7 @@ while (($key, $fname) = each %menu_keyfunc) {
}
print <<HEADING;
-Content-Type: text/html
+Content-Type: text/html; charset=$charset
<HTML>
<HEAD>
