[Mew-dist 09773] Re: pgp sign

[Yasushi Shoji]

From: Kazu Yamamoto (山本和彦) <kazu at example.com>
Subject: [Mew-dist 09758] Re: pgp sign
Date: Mon, 19 Jul 1999 15:59:20 +0900

> From: HEO SeonMeyong <seirios at example.com>
> Subject: [Mew-dist 09748] pgp sign
> Date: Mon, 19 Jul 1999 02:21:01 +0900
> 
> > 	C-cC-sでpgp-signをする場合、
> > 	1) pgp で sign する
> > 	2) ispell で spell check する
> > 
> > 	と言う順序で spell check がかかります。
> 
> hook の話をしていますか？
> 
> mew-real-send-hook ではなく、mew-send-hook を使えばいいだけの話ではな
> いのですか？

これは、mew-send-hookで、ispellを呼んでもなります。
自分はよく、mew-draft-make-message(C-c C-m)してしまって spell check
できなくなっていました。(あたりまえなんですが‥)

そこで mew-draft-checkedみたいな variableを作って、
下記の function 達で 
(if (eq mew-draft-checked nil)
    (run-hook 'mew-draft-check-hook)
    (setq mew-draft-checked t))

とかすると、幸せになれそうなんですが、どうでしょう？
# いまさら新しい variableや functionを増やすのはまずい？

たぶん問題の functions:
mew-pgp-sign-letter
mew-pgp-encrypt-letter
mew-pgp-sign-encrypt-letter
mew-draft-send-letter 
mew-draft-make-message
--
            yashi