[Mew-dist 11875] Re: 初期設定ファイル(Re: 1.95b13)

[Ninomiya Hideyuki]

おはようございます	二宮 @ お四国 です。

Shun-ichi TAHARA (田原 俊一) <jado at example.com> は Thu, 16 Dec 1999 02:56:44 +0900 頃に
    Subject:    [Mew-dist 11872] Re: 初期設定ファイル(Re: 1.95b13)
    Message-ID: <19991216025240P.jado at example.com>
        に於いて、以下のようにおっしゃっていました。
※都合により手を加えさせて頂く事があります。御了承下さいマセマセ....
jado> From: Ninomiya Hideyuki <nin at example.com>
jado> Message-Id: <19991216.005118.85406608.nin at example.com>
jado> 
jado> > Mew 専用の設定を emacs 起動時に全部 load しなくても良いんじゃない ?
jado> > です。
jado> > M-x mew or M-x mew-send した時に load すりゃ良いじゃん。
jado> > です。
jado> > 
jado> > その方が、emacs の設定と Mew の設定 はっきり別れて、見通し良い
jado> > んじゃないかと.....
jado> 
jado> まあ、Mewの設定を全部追い出すと、なにかと不都合が出るかもしれませんが、
jado> 変数によっては、別ファイルに追い出した方が幸せかもしれません。
jado> 
jado> つーわけで、
jado> 
jado> (add-hook 'mew-init-hook
jado>   '(lambda ()
jado>      (load (concat mew-mail-path "/Config") t t)))
jado> 
jado> てな感じでどうでしょう?

mew.el を読み直してて、(run-hook 'mew-env-hook)ってのが在るのに改めて
気が付きました。
それで、.emacs には

(autoload xxxx
........
;;;;; Mew start-up file load seting
(add-hook 'mew-env-hook
	  '(lambda ()
	     (load (expand-file-name "~/.mew/start-up.el") nil t)))

して、~/.mew/start-up.el で

(add-hook 'mew-init-hook
	  '(lambda ()
	     (load (expand-file-name "~/.mew/post-init.el") nil t)))

する事で、やろうとしてた事は出来ました。

でっ、これと同じ事をもっと簡素に記述する為の関数を Mew で用意すると
初心者でもこういう事がやり易くて便利かなっ、、と思った次第です。
---
                                         二宮 秀幸@愛媛 鬼北 広見町
PGP-Fingerprint: 6C59 EC08 5B23 6490 44D0  7CD3 DA40 219F 7114 8553
ICQ UIN:57442553                           mailto:nin at example.com
                           http://user.shikoku.ne.jp/nin/index.html