2008年8月14日

[mew-dist 28589] Re:X 使用時の mew-face-header-marginal の色について

山本です。

> 調べたところ、どうも [mew-dist 28563] のパッチの影響のようです。
> ほとんど状況報告だけになりましたが、宜しくお願い致します。

どうも、静的なリテラルを変更するとおかしくなる問題のようです。
これで、直りますか?

--かず

Index: mew-vars3.el
===================================================================
RCS file: /cvsroot/mew/mew/mew-vars3.el,v
retrieving revision 1.7
diff -c -r1.7 mew-vars3.el
*** mew-vars3.el 30 Jul 2008 09:46:13 -0000 1.7
--- mew-vars3.el 14 Aug 2008 06:57:06 -0000
***************
*** 18,24 ****
(defun mew-face-make-spec (bold &rest spec)
(let (ret key col)
(if (and bold (not (member :tty spec)))
! (setq ret '((((class color) (type tty)) (:bold t)))))
(while spec
(setq key (car spec))
(setq spec (cdr spec))
--- 18,24 ----
(defun mew-face-make-spec (bold &rest spec)
(let (ret key col)
(if (and bold (not (member :tty spec)))
! (setq ret (copy-sequence '((((class color) (type tty)) (:bold t))))))
(while spec
(setq key (car spec))
(setq spec (cdr spec))


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




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