mailto

[Katsumi Yamaoka <yamaoka@xxxxxxx>]

これは不具合と言って良いと思うのですが、web ページの mailto リン
クをたたいたときに、デフォルトでは送信用のドラフトバッファがポッ
プアップされないので、ユーザには一見何も起こらなかったように見え
ます。

例: http://home.tripod.co.jp/help/ の「不正使用の報告」ボタン。
;; 余談ですが、こちらさまは spammer 退治に非常に積極的です。:)

デフォルトというのは mail-user-agent の値 sendmail-user-agent の
ことで、これの composefunc (送信用のドラフトを作る関数) は
sendmail-user-agent-compose です。これに限らず、いろんな MUA が
用意する composefunc は、たいていはバッファをポップアップする機
能が無いようなので、以下のような機能を組み込んでみま...す。本業
を一仕事終えたら。^^;;

  composefunc の実行後に新設されたバッファの major-mode が特定の
  値だったら、それに対応する関数を呼ぶ。

(defcustom w3m-mailto-url-popup-function-alist
  '((cmail-mail-mode . pop-to-buffer)
    (mail-mode . pop-to-buffer)
    (message-mode . pop-to-buffer)
    (mew-draft-mode . pop-to-buffer)
    (mh-letter-mode . pop-to-buffer)
    (wl-draft-mode . pop-to-buffer))
  "*Alist of (MAJOR-MODE . FUNCTION) pairs used to popup a mail buffer.
If a user clicks on a `mailto' url and a mail buffer is composed by
`mail-user-agent' with the MAJOR-MODE, FUNCTION will be called with a
mail buffer as an argument."
  :group 'w3m
  :type '(repeat (cons :format "%v" (symbol :tag "major-mode") function)))
-- 
Katsumi Yamaoka <yamaoka@jpl.org>