[Date Prev] [Date Index] [Date Next]
[Thread Prev] [Thread Index] [Thread Next]

[xyzzy:06405] Re: バグレポ&質問



大矢です


>喜多さんに断りなく改造バージョンを公開するのはなんなので、
>ヒントだけ。
>(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*))

おお、ちゃんとうごきました。ありがとうございました。


paren.lの作者さんの喜多さんも便利なツールをありがとうございます。


-- 
ohya <ohya@xxxxxxxxxxxxxxx>

Index Home