[Date Prev][Date Next][Thread Prev][][Date Index][Thread Index]

Re: タブのシャフリング

白井です。

From: Katsumi Yamaoka <yamaoka@xxxxxxx> さん曰く
Subject: Re: [emacs-w3m:09312] Re: タブのシャフリング
Message-ID: <b4my7lf6qdc.fsf@xxxxxxx>
Date: Fri, 30 Mar 2007 18:18:55 +0900

> ただ、これらはすべて w3m-tab-mouse-track-selected-tab で採取した
> んですね。つまり double- だろうが triple- だろうがいっしょくたに
> なって w3m-tab-* コマンドを呼んでいて、undefined のエラーが出る
> ことはありません。例えば

例えば、[header-line mouse-4] をその map で定義してあれば
double-mouse-4, triple-mouse-4 が(見た目)発生することは無いよう
ですね。

(0) emacs -q で立ち上げて、(load "w3m-load") だけして、M-x w3m。

> > (1) window を二つに分割して、上半分を w3m 以外、下半分を w3m に
> >     する。
> > (2) 下の w3m の方のタブでクルクルする。
> 
> この条件でも。
> 
> >> と、キーマップに蓋をかぶせてしまうのではだめですか?
> > 実はこの辺はすでに試していたのですがダメでした。
> 
> ということは、直接 global-map を見ているんですかねえ。

としか思えないのですよ、理由はわかりませんが。

global-map に [header-line mouse-4] を加えないときは
"header-line mouse-4 undefined" なメッセージが出たときもあります。

上記の emacs -q の試験に追加して

(define-key global-map [header-line mouse-4] 'my-mouse-check)
(define-key global-map [header-line mouse-5] 'my-mouse-check)
(define-key global-map [header-line wheel-up] 'my-mouse-check)
(define-key global-map [header-line wheel-down] 'my-mouse-check)

(defun my-mouse-check (event)
  (interactive "e")
  (save-excursion
    (set-buffer (get-buffer "*scratch*"))
    (goto-char (point-max))
    (insert (format "NG: %s\n" (symbol-name (car event))))))

として、くるくる回すと

こっちは、X-server 上の Emacs
NG: mouse-5
NG: mouse-5
NG: double-mouse-5
NG: triple-mouse-5
NG: mouse-5
NG: mouse-4
NG: mouse-4
NG: double-mouse-4
NG: mouse-4

こっちは Meadow3
NG: double-wheel-down
NG: double-wheel-down
NG: double-wheel-down
NG: triple-wheel-down
NG: wheel-down
NG: double-wheel-down
NG: double-wheel-up
NG: wheel-up
NG: wheel-up
NG: double-wheel-up

なのがボロボロ出てくるのですよ。ちなみに、w3m のバッファが上側の
時は発生しません。

-- 
白井秀行 (mailto:shirai@xxxxxxxxxxx)

> ;; 白井さんが私信で転送して下さったメーリングリストの記事を
> ;; burst して、この返事を書きました。

## 山岡さんから直接来たメールに返事を書きました :-)
## ML に届くのはいつのことか？