[Mew-dist 15597] Re: mew-icon-directory

Tomoyuki Murakami tomoyuki at example.com
2000年 12月 21日 (木) 00:22:58 JST


Suggestionありがとうございます。

>>> In [Mew-dist 15572] Re: mew-icon-directory
>>> NINOMIYA Hideyuki <nin at example.com> wrote:

nin> れお> b77 -> b87 の uniform diff ...
nin> れお> >Index: mew-xemacs.el
nin> れお> >+(defvar mew-icon-directory (if (fboundp 'locate-data-directory)
nin> れお> >+                              (locate-data-directory "mew")))
nin> 
nin> これが効いていないようです。
nin> ざっと見たところ mew-key.el で (defvar mew-icon-directory nil) されてて
nin> mew-env.el で load  する順序が mew-key -> mew-[tgx]emacs の順になってる
nin> せいのようです。

自分はLispに全く暗いのですが、このような2箇所以上で同じ変数をdefvarして
いると最初に出てきたdefvarのみが有効になるということなのでしょうか?

とりあえず、自分の.mewでsetqしていたmew-icon-directoryをコメントアウトし、
二宮さんのパッチを当てることで起動時のkiki-jijiとアイコンの絵柄が戻って
きて一安心しました。

以降はsource上の変数管理やコーディングスタイルの問題かもしれませんが、
mew-key.el側のdefvarをやめてしまう、
--- mew-key.el~ Fri Dec 15 13:43:27 2000
+++ mew-key.el  Wed Dec 20 23:48:11 2000
@@ -588,7 +588,7 @@
 ;;; Icons
 ;;;
 
-(defvar mew-icon-directory nil)
+;;(defvar mew-icon-directory nil)
 
 (defvar mew-icon-separate nil)
 (defvar mew-icon-blank nil)

を試してみましたが、これでも表示されないという問題は無くなるようです。
ただ、setqとdefvarの位置関係というかそこらへんの細かいところは自分なりに
追えていず、いまだ未解決なのはちょっと心残りではあります。



Mew-dist メーリングリストの案内