w3m

commit b17b218ec301c3fbef0eca584d0342fe3c8c2913
parent 540ca4e61d04484a9802a67ddc6a12899a8d4151
Author: ukai <ukai>
Date:   Wed, 30 Jan 2002 04:27:32 +0000

[w3m-dev 02930] Re: fixed w3mmail.cgi
* scripts/w3mmail.cgi.in (lang_header_default): [=_?] should be encoded
* scripts/w3mmail.cgi.in (lang_body_default): '=' should be encoded
From: Hironori Sakamoto <hsaka@mth.biglobe.ne.jp>

Diffstat:
M
ChangeLog
 | 
6
++++++
M
scripts/w3mmail.cgi.in
 | 
4
++--

2 files changed, 8 insertions(+), 2 deletions(-)
diff --git a/ChangeLog b/ChangeLog
@@ -1,5 +1,11 @@
 2002-01-30  Hironori Sakamoto <hsaka@mth.biglobe.ne.jp>
 
+	* [w3m-dev 02930] Re: fixed w3mmail.cgi
+	* scripts/w3mmail.cgi.in (lang_header_default): [=_?] should be encoded
+	* scripts/w3mmail.cgi.in (lang_body_default): '=' should be encoded
+
+2002-01-30  Hironori Sakamoto <hsaka@mth.biglobe.ne.jp>
+
 	* [w3m-dev 02929] Re: fixed w3mmail.cgi
 	* file.c (openPagerBuffer): use content_charset as document_code
 	* file.c (getNextPage): code is document_code or DocumentCode
diff --git a/scripts/w3mmail.cgi.in b/scripts/w3mmail.cgi.in
@@ -242,7 +242,7 @@ sub lang_html_quote {
 
 sub lang_header_default {
     local($h) = @_;
-    if ($h =~ s/([\x80-\xFF])/sprintf("=%02x", ord($1))/ge) {
+    if ($h =~ s/([=_?\x80-\xFF])/sprintf("=%02x", ord($1))/ge) {
 	return "=?iso-8859-1?Q?$h?=";
     } else {
 	return $h;
@@ -253,7 +253,7 @@ sub lang_body_default {
     local($body, $_7bit) = @_;
     if ($body =~ /[\x80-\xFF]/) {
 	if ($_7bit) {
-	    $body =~ s/([\x80-\xFF])/sprintf("=%02x", ord($1))/ge;
+	    $body =~ s/([=\x80-\xFF])/sprintf("=%02x", ord($1))/ge;
 	    return ("iso-8859-1", "quoted-printable", $body);
 	} else {
 	    return ("iso-8859-1", "8bit", $body);