Re: charset="Windows-31J"

NAKAJI Hiroyuki <[email protected]>
Newsgroups gmane.emacs.gnus.semi.japanese
Message-ID <[email protected]>
>>>>> In [semi-gnus-ja : No.20372] 
>>>>>	Katsumi Yamaoka <[email protected]> wrote:

> > Content-Type: text/plain; charset="Windows-31J"
> > (*) [...]

> ?

> (add-to-list 'mm-charset-synonym-alist
> 	     '(windows-31j . shift_jis))



Gnus 


--- lisp/mm-util.el	16 Jul 2006 19:12:25 +0900	7.53
+++ lisp/mm-util.el	16 Jul 2006 19:19:51 +0900	
@@ -229,6 +229,10 @@
 	(if (mm-coding-system-p 'cp949)
 	    '((ks_c_5601-1987 . cp949))
 	  '((ks_c_5601-1987 . euc-kr))))
+    ;; A Microsoft misunderstanding?
+    ,@(if (and (not (mm-coding-system-p 'windows-31j))
+	       (mm-coding-system-p 'shift_jis))
+	  '((windows-31j . shift_jis)))
     )
   "A mapping from unknown or invalid charset names to the real charset names.")

--- lisp/ChangeLog	16 Jul 2006 19:12:23 +0900	7.1301
+++ lisp/ChangeLog	16 Jul 2006 19:21:19 +0900	
@@ -1,3 +1,8 @@
+2006-07-16  NAKAJI Hiroyuki  <[email protected]>
+
+	* mm-util.el (mm-charset-override-alist): Map "windows-31j" to
+	"shift_jis".
+
 2006-07-14  Andreas Seltenreich  <[email protected]>
 
 	* gnus-start.el (gnus-subscribe-options-newsgroup-method): Doc fix.
-- 
NAKAJI Hiroyuki ( )
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.