2010年4月 9日

[mew-dist 29199] Re:共通のmew.elファイルの設定をホスト毎にカスタマイズする方法

増田です。

On Fri, 09 Apr 2010 08:40:32 +0900 (JST)
Hideyuki SHIRAI (白井秀行) <shirai@xxxxx> wrote:

> default-case を決定できます。当然、mew-config-alist は膨れ上がり
> ますけど。

私も似たようなことをやってました。
あと、以前こんなこともやってました。

(1) 以下の関数を ~/.emacs に定義。

;; mew-lisp-load() を自分用に改造
(defun my-lisp-load (filename)
"Load lisp from FILENAME"
(let ((fullname (expand-file-name filename "~/.spec"))
lisp)
(when (file-readable-p fullname)
(with-temp-buffer
(progn
(insert-file-contents fullname)
(setq lisp
(condition-case nil
(read (current-buffer))
(error ()))))))
lisp))

(2) ~/.mew.el にはこのように書きます。

(setq mew-hogehoge (my-lisp-load "mew-hogehoge"))

(3) サイト A とサイト B に ~/.spec/mew-hogehoge という
ファイルを作成。mew-hogehoge に設定したい値を書く。

(("hoge"
(aaa . AAA)
(bbb . BBB))
("hugahuga"
(xxx . XXX)
(yyy . YYY)))

--
Takashi Masuda <masutaka@xxxxx>


投稿者 xml-rpc : 2010年4月 9日 20:49
役に立ちました?:
過去のフィードバック 平均:(0) 総合:(0) 投票回数:(0)
本記事へのTrackback: http://hoop.euqset.org/blog/mt-tb2006.cgi/94917
トラックバック
コメント
コメントする




画像の中に見える文字を入力してください。