[xyzzy:07316] Re: xyzzy ボールド化計画
- Subject: [xyzzy:07316] Re: xyzzy ボールド化計画
- From: "Seiya Suda" <seiya.suda@xxxxxxxxxxx>
- X-mailer: Microsoft Outlook IMO, Build 9.0.2416 (9.0.2911.0)
こんばんは。
自己レスです。
> (add-hook '*text-mode-hook*
> #'(lambda () (interactive)
> (set-text-attribute (point-min) (point-max)
> 'bolden
> :bold t)))
>
> ただ、これだけだと、point-max 以降に追加したのが
> ボールドにならないので、さらに次も追加してます。
これがうまくいかない場合が多いので、
新潮文庫のCDには1500円で太明朝がついてくるぞ、
しかし暑いから買いに行くのはやだねとか
いろいろ調べて苦しんでいたのですが、
フトかんがえて、
(add-hook '*text-mode-hook*
#'(lambda () (interactive)
(set-text-attribute (point-min) (+ (point-min) 10000000)
'bolden
:bold t)))
こんなふうにしてみたところ、EOFの直前はうまくいかないものの、
その前の方に挿入する場合はうまくいくのを発見しました。
こうすると、post-command-hook はいらないようです。
10000000 という数字をさらに
100000000000 くらいにすると
評価さえしてくれないようですが。。。。
------------------
須田誠也(Seiya Suda)
seiya.suda@xxxxxxxxxxx
http://member.nifty.ne.jp/seiya-suda/