[xyzzy:06423] paren.l

[喜多 淳一郎 <kita@xxxxxxxxxxxxxxxxx>]

喜多です．こんにちは．

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

お気遣いありがとうございます．改造したものを公開して頂いてもかまいません．
よりよいものにして頂けるなら大歓迎です．もちろん連絡をいただければうれしい
です．
で，今までのものは再配布について何も言及していなかったので，新しいバージョ
ンはGPLにしました．

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

# set-text-attributeのところがevalのparen.lはかなり古いバージョンのもので
# すね．

>(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を改造してみました．
*paren-highlight-only-paren*をtにすれば，括弧だけをハイライトします．ハイ
ライトの仕方を変えたい場合は*paren-paren-attribute*を適当に設定してくださ
い．

-- 
喜多 淳一郎 mailto:kita@xxxxxxxxxxxxxxxxx