Mewのシングルパートでの転送

Mew のメール転送は、マルチパートでの転送となる(mew-summary-forward)。
このため、シングルパートで転送を行う関数を追加した。

【動作確認を行ったバージョン】
Mew 5.2/6.3/6.4

詳細は、下記の通りである。

1. ~/.mew.el への設定の追加

(defun mew-summary-forward-single (&optional no-prefix)
  "Forward this message to a third person. A new draft is prepared in
Draft mode and this message is automatically inserted.
If NO-PREFIX is nil, insert citation prefix and label."
  (interactive)
  ;; create multipart message (original message is attached)
  (mew-summary-forward)
  ;; delete entire attachments (same as main part of mew-attach-delete)
  (when (mew-attach-p)
    (goto-char (point-min))
    (goto-line (+ (mew-attach-line) 2))
    (mew-delete-directory-recursively (mew-attachdir))
    (setq mew-encode-syntax nil)
    (mew-attach-clear))
  ;; insert original message
  (if no-prefix
      (mew-draft-yank)
    (mew-draft-cite)))

(defalias 'mew-summary-forward-single-no-prefix
  '(lambda ()
     (interactive)
     (mew-summary-forward-single t))
  "This is an alias for (mew-summary-forward-single t).")

(define-key mew-summary-mode-map "\ef" 'mew-summary-forward-single)
(define-key mew-summary-mode-map "\eF" 'mew-summary-forward-single-no-prefix)

2. 使用方法

(1) Summary モードにおいて、メッセージを選択し、M-f または M-F を押下する。

・M-f: 引用符の挿入あり (mew-summary-forward-single の実行)
・M-F: 引用符の挿入なし (mew-summary-forward-single-no-prefix の実行)

(2) 宛先アドレスを指定し、送信する。