2011-11-07 16 views
3

我將此添加到我的配置文件來修復滾動並添加一些文本縮放的技巧,但鼠標5和M鼠標5和C鼠標5不起作用。我仍然可以看到消息:<mouse-5>未定義,等等...爲什麼它不適用於鼠標5?我怎樣才能綁定鼠標5?Emacs鼠標-5綁定問題(向下滾動)

;; ===== Scrolling fix for advanced mouses ============================= 
(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) 
; Scroll up five lines with META held 
(global-set-key [M-mouse-4] 'down-slightly) 
(global-set-key [M-mouse-5] 'up-slightly) 
; Scroll up one line with SHIFT held 
(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) 
; Scroll up one page with CTRL held 
;;(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) 
(global-set-key (kbd "<C-mouse-4>") 'text-scale-decrease) 
(global-set-key (kbd "<C-mouse-5>") 'text-scale-increase) 

應用的編輯器/ emacs的-23.3-R2 USE =「X ALSA DBUS GIF GPM GTK JPEG,PNG聲音 TIFF Xft的XPM -Xaw3d(-Aqua)-athena -gconf -gzip-EL -hesiod -kerberos -livecd -m17n-lib的-motif -source -svg -toolkit-滾動條」

回答

5

我喜歡使用​​宏b/C你可以剪切和粘貼你拿到鑰匙的名字從使用Ch k。所以,試試這個:

(global-set-key (kbd "<mouse-4>") 'down-slightly) 
(global-set-key (kbd "<mouse-5>") 'up-slightly) 
+0

有(全球設置鍵(KBD「」)「文本尺度增加),但它甚至不工作,(全球設置鍵(KBD‘’ )'文字縮小)工作正常。 – Cynede