Проблема с привязкой мыши Emacs-5 (прокрутка вниз) - PullRequest
2 голосов
/ 07 ноября 2011

Я добавил это в свой конфигурационный файл, чтобы исправить прокрутку и добавить некоторые хитрости для масштабирования текста, но mouse-5 и M-mouse-5 и C-mouse-5 не работают. Я до сих пор вижу сообщения: <mouse-5> не определено и т. Д. Почему это не работает для мыши-5? Как я могу связать мышь-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)

app-editors / emacs-23.3-r2 USE = "X alsa dbus gif gpm gtk jpeg png sound tiff xft xpm -Xaw3d (-aqua) -athena -gconf -gzip-el -hesiod -kerberos -livecd -m17n-lib -motif -source -svg -toolkit-scroll-bars "

1 Ответ

4 голосов
/ 07 ноября 2011

Мне нравится использовать макрос kbd b / c, вы можете просто вырезать и вставить имя ключа, полученного при использовании C-h k . Итак, попробуйте это:

(global-set-key (kbd "<mouse-4>") 'down-slightly)
(global-set-key (kbd "<mouse-5>") 'up-slightly)
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...