[Mew-dist 2118] Re: Can't send mail on Mew

[Kazuhiko Shiozaki]

From: 松浦孝範 (Takanori Matsuura) <t-matsuu at example.com>
Subject: [Mew-dist 2115] Can't send mail on Mew

> 今日、xemacs-20.3-b20とxemacs-20.3-b21でMew-1.91 + im-71を使ってメールを
> 送ろうとしたのですが
> No such coding system: iso-2022-ss2-7
> とミニバッファに表示されて送れませんでした。
> 
> 一応、強引に mew-mule3.elの iso-2022-ss2-7 を iso-2022-jp-7bit-ss2 に変
> 更したら直りました。

少し前に話題になっていましたね。xemacs-20.3-b20のChangeLogに、こう書いて
あります。

1997-08-25  MORIOKA Tomohiko  <morioka at example.com>

        * lisp/apel/emu-x20.el (mime-charset-coding-system-alist):
        iso-2022-jp-2 is defined as coding-system.

        * lisp/mule/mule-coding.el: Rename `iso-2022-ss2-{7|8}' ->
        `iso-2022-{7|8}bit-ss2' to sync with Emacs 20.0.96.

        (iso-2022-jp-2): New coding system.

というわけで、以下のパッチをあててください。

*** mew-mule3.el.orig	Thu Sep 18 17:34:49 1997
--- mew-mule3.el	Thu Sep 18 17:28:26 1997
***************
*** 22,36 ****
  (defvar mew-cs-noconv       'no-conversion)
  (defvar mew-cs-noconv-eol   'no-conversion)
  (if mew-xemacs-p
      (progn
-       (defvar mew-cs-autoconv	  'automatic-conversion)
        (defvar mew-cs-7bit         'iso-2022-ss2-7)
        (defvar mew-cs-7bit-crlf    'iso-2022-ss2-7-dos)
  
        (defvar mew-cs-mime-trans   'iso-2022-ss2-7)
        (defvar mew-cs-rfc822-trans 'iso-2022-ss2-7))
    
-   (defvar mew-cs-autoconv     'undecided)
    (defvar mew-cs-7bit         'iso-2022-7bit-ss2)
    (defvar mew-cs-7bit-crlf    'iso-2022-7bit-ss2-dos)
  
--- 22,37 ----
  (defvar mew-cs-noconv       'no-conversion)
  (defvar mew-cs-noconv-eol   'no-conversion)
  (if mew-xemacs-p
+     (defvar mew-cs-autoconv        'automatic-conversion)
+   (defvar mew-cs-autoconv          'undecided))
+ (if (and mew-xemacs-p (find-coding-system 'iso-2022-ss2-7))
      (progn
        (defvar mew-cs-7bit         'iso-2022-ss2-7)
        (defvar mew-cs-7bit-crlf    'iso-2022-ss2-7-dos)
  
        (defvar mew-cs-mime-trans   'iso-2022-ss2-7)
        (defvar mew-cs-rfc822-trans 'iso-2022-ss2-7))
    
    (defvar mew-cs-7bit         'iso-2022-7bit-ss2)
    (defvar mew-cs-7bit-crlf    'iso-2022-7bit-ss2-dos)