[mhc:00631] Re: Display icons on XEmacs

[Yuuichi Teranishi <teranisi@xxxxxxxxxxxxx>]

At Mon, 29 May 2000 15:54:27 +0900,
Hideyuki SHIRAI wrote:
[...]
> の様に明示的に 'invisilble を nil にしないと space の 'invisible
> が消えないから、ということが原因の様です。
> space が 'invisible のままなのは Emacs 20.6 でも同様でしたが、3ヵ
> 月カレンダの表示乱れは、上記のパッチ前、パッチ後ともありませんで
> した。

たしかにこのへん、挙動不審でした。
白井さんの変更通り明示的に設定するほうがよさそうですね。
if 文が冗長になるので簡略化してこんなかんじでしょうか。

    (if (mhc-use-icon-p)
	(progn
	  ;; XX icon must have 2 character width.
	  (setq space "  ")
	  (put-text-property 0 2 'invisible 
			     (and category
				  (setq icon (mhc-get-icon category)) 
				  t)
			     space)
	  (setq insert (concat insert space))))

--
Yuuichi Teranishi (寺西裕一) <teranisi@xxxxxxxxxxxxx>
NTT Cyber Space Laboratories Information-base Project
"The love you take is equal to the love you make..."