[Message Prev][Message Next][Thread Prev][Thread Next][Message Index][Thread Index]

[MD:2115]Vanishable mouse cursor.



At Thu, 08 Mar 2001 13:53:55 +0900 (JST),
Hideyuki SHIRAI (白井秀行) wrote:
> あべ> # テキストにmouse-faceを設定する方法がわからないので、ちゃんと実験した
> あべ> # わけじゃないんですが。
> 
> (defun mtest (beg end &optional arg)
>   (interactive "r\nP")
>   (if arg
>       (put-text-property beg end 'mouse-face nil)
>     (put-text-property beg end 'mouse-face 'highlight)))

どもです。
これでいろいろ実験してみました。

どうも、濡れ衣半分、のような感じです。
発生の条件がかなり信じられないっす。

1.meadow -q
2.C-c RET l Japanese
3.windowの上から2行(以上)にmouse-faceが付いている状態
  起動直後の*scratch*で
  (mtest 0 74)
  (mtest 75 134)
  (mtest 135 181)
  というかんじ。
  (mtest 0 182)
  でもよさげ
4.meadowのメニューバーが(0,0)〜(600,30)  <= 目測です
  くらいに入るように移動

これで、メニューバーとタイトルバーでマウスカーソルが消えます
Meadowのwindowをずらすと消えません。

また、windowの上3行にmouse-faceのある行がなければ

ふだんはこんな感じで使っているので、発生したみたいです。
(setq default-frame-alist
      (append
       (list
	'(width . 100)
	'(height . 35)
	'(top . 0)
	'(left . 0)
	) default-frame-alist))

なんかよくわかりません。

----
ABE Yasushi