From 6fc7a64a5a2eb94338b775d2ca5449e946197ea5 Mon Sep 17 00:00:00 2001 From: Fumitoshi UKAI Date: Mon, 22 Mar 2004 17:03:13 +0000 Subject: * 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 --- ChangeLog | 8 +++++++- scripts/w3mhelp-funcdesc.en.pl.in | 2 ++ scripts/w3mhelp-funcdesc.ja.pl.in | 2 ++ scripts/w3mhelp.cgi.in | 7 ++++--- 4 files changed, 15 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index 761b32a..212842a 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2004-03-23 Fumitoshi UKAI + + * 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 * 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 < -- cgit v1.2.3