diff options
| -rw-r--r-- | ChangeLog | 8 | ||||
| -rw-r--r-- | scripts/w3mhelp-funcdesc.en.pl.in | 2 | ||||
| -rw-r--r-- | scripts/w3mhelp-funcdesc.ja.pl.in | 2 | ||||
| -rw-r--r-- | scripts/w3mhelp.cgi.in | 7 |
4 files changed, 15 insertions, 4 deletions
@@ -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 @@ -8341,4 +8347,4 @@ a * [w3m-dev 03276] compile error on EWS4800 * release-0-2-1 * import w3m-0.2.1 -$Id: ChangeLog,v 1.910 2004/03/22 03:32:27 ukai Exp $ +$Id: ChangeLog,v 1.911 2004/03/22 17:03:13 ukai Exp $ diff --git a/scripts/w3mhelp-funcdesc.en.pl.in b/scripts/w3mhelp-funcdesc.en.pl.in index 924db7c..d854b59 100644 --- 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 index 5dcfb3b..051c888 100644 --- 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 index 92af2d3..135b835 100644 --- a/scripts/w3mhelp.cgi.in +++ b/scripts/w3mhelp.cgi.in @@ -1,5 +1,5 @@ #!@PERL@ -# $Id: w3mhelp.cgi.in,v 1.27 2003/10/20 16:49:11 ukai Exp $ +# $Id: w3mhelp.cgi.in,v 1.28 2004/03/22 17:03:13 ukai Exp $ if ( $^O =~ /^(ms)?(dos|win(32|nt)?)/i ) { $CYGPATH = 1; @@ -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> |