Re: [MD:5665] Re: fringe 関連コードのマージ

[MIYOSHI Masanori <miyoshi@xxxxxxxxxxx>]

>>>>> [meadow-develop : No.5672] にて
>>>>> "三好" = 私は書きました:
kose> http://www.NetLaputa.ne.jp/~kose/Emacs/images/gdb.png
kose> これじゃないでしょうか。

三好> ここで左 fringe に表示されているのは、`Overlay arrow bitmap' とい
三好> うやつだと思います。どんなときに使われるのかは知りません。

ちょっと訂正。

オーバーレイ用のビットマップとユーザ定義のビットマップが重ね合わ
さってますね。

三好> ;; 2.20-dev では表示用のフラグがオンにならないのでまだ描画できな
三好> ;; いはずです。

前者については2.00でも表示可能でしたね。後者については2.20-devで
表示できるようにしておきました。

例えば下記を評価すると、バッファの先頭の左 fringe に黒丸が表示さ
れます。

(let ((string "x")
      (overlay (make-overlay (point-min) (point-min)))
      (bitmap (define-fringe-bitmap "\x3c\x7e\xff\xff\xff\xff\x7e\x3c")))
  (put-text-property 0 (length string) 'display
		     (list 'left-fringe bitmap) string)
  (overlay-put overlay 'before-string string))


--
三好 雅則 http://www.boreas.dti.ne.jp/~miyoshi/