[xyzzy:06404] Re: バグレポ＆質問

[Nakanishi Takahiro <naka@xxxxxxxxxxxxx>]

中西です。

> おお、こんな方法があったのですか。できれば括弧だけ色を
> つける変更点を教えていただけるとうれしいのですが。

喜多さんに断りなく改造バージョンを公開するのはなんなので、
ヒントだけ。

(eval (append `(set-text-attribute ...)))

となっているところを、以下のものと取りかえる。

(if (> from to) (psetq to from from to))
(eval `(set-text-attribute ,from (1+ ,from) *paren-tag*	,@*paren-attribute*))
(eval `(set-text-attribute ,to (1- ,to) *paren-tag* ,@*paren-attribute*))

うまくいかなかったらごめんなさい。
--
naka@xxxxxxxxxxxxx