XFree86-4でホイールマウスを使おう！

オソマキながらホイールマウスというのを購入してきました。早速、いろいろ調べて設定をした結果、emacs-20.7やnetscapeで使えるようになったのでその情報を公開します。

ちなみに購入したマウスはサンワサプライの「オプトeマウス(品番：MA-EMOUPB(ブルー＆クリアーブルー))」です。

1. XFree86-4の設定
   私はXFree86-4.1.0を使っていますが。他のバージョンでも変わらないと思います。XFree86-4では設定ファイルのマウスの記述を以下のようにします。
   • FreeBSDの場合

     Section "InputDevice"
           Identifier  "Mouse0"
           Driver      "mouse"
           Option      "Protocol" "auto"
           Option      "Device" "/dev/mouse"
           Option      "Buttons" "5"
           Option      "ZAxisMapping" "4 5"
     EndSection
     

   • NetBSDの場合

     Section "InputDevice"
           Identifier  "Mouse0"
           Driver      "mouse"
           Option      "Protocol" "wsmouse"
           Option      "Device" "/dev/wsmouse"
           Option      "Buttons" "5"
           Option      "ZAxisMapping" "4 5"
     EndSection
     

   これでXはホイールマウスが使えるようになりました。ホイールの部分をクリックするとバッファ内の文字列がペーストされます。3ボタンと同じふるまいをするということですね。次はアプリケーションごとの設定です。

2. netscape
   何もしなくてもホイールで上下にスクロールできました。スバラシイ！
3. emacs-20.7
emacsの場合は以下の記述を.emacsに追加します。

   ; wheel mouse
   (progn
     (defun up-slightly () (interactive) (scroll-up 5))
     (defun down-slightly () (interactive) (scroll-down 5))
     (global-set-key [mouse-4] 'down-slightly)
     (global-set-key [mouse-5] 'up-slightly)
     (defun up-one () (interactive) (scroll-up 1))
     (defun down-one () (interactive) (scroll-down 1))
     (global-set-key [S-mouse-4] 'down-one)
     (global-set-key [S-mouse-5] 'up-one)
     (defun up-a-lot () (interactive) (scroll-up))
     (defun down-a-lot () (interactive) (scroll-down))
     (global-set-key [C-mouse-4] 'down-a-lot)
     (global-set-key [C-mouse-5] 'up-a-lot)
     (defun scroll-up-half ()
       "Scroll up half a page."
       (interactive)
       (scroll-up (/ (window-height) 2))
     )
     (defun scroll-down-half ()
       "Scroll down half a page."
       (interactive)
     (scroll-down (/ (window-height) 2))
     )
     (global-set-key [(mouse-5)] 'scroll-up-half)
     (global-set-key [(mouse-4)] 'scroll-down-half)
   )
   

4. kterm
ktermの場合は、.Xdefaultsに以下の記述を追加します。

   KTerm*VT100*translations: #override Shiftspace : begin-conversion(JAPANESE_CONVERSION) \n\
   :     scroll-back(6) \n\
   :     scroll-forw(6)
   

   2行目と3行目がスクロールするための設定です。