fix mouse-mode for terminals
This commit is contained in:
@@ -557,12 +557,17 @@ Version 2016-07-13"
|
||||
;;
|
||||
;; Enable mouse support, https://stackoverflow.com/questions/5710334/how-can-i-get-mouse-selection-to-work-in-emacs-and-iterm2-on-mac
|
||||
(unless (display-graphic-p)
|
||||
(require 'mouse)
|
||||
;; (require 'mouse)
|
||||
(require 'xt-mouse)
|
||||
(xterm-mouse-mode t)
|
||||
(global-set-key [mouse-4] (lambda () (interactive) (scroll-down 1)))
|
||||
(global-set-key [mouse-5] (lambda () (interactive) (scroll-up 1)))
|
||||
(defun track-mouse (e))
|
||||
(setq mouse-sel-mode t))
|
||||
(global-set-key (kbd "<wheel-up>") 'scroll-down-line)
|
||||
(global-set-key (kbd "<wheel-down>") 'scroll-up-line)
|
||||
;; still needed?
|
||||
;; (global-set-key [mouse-4] (lambda () (interactive) (scroll-down 1)))
|
||||
;; (global-set-key [mouse-5] (lambda () (interactive) (scroll-up 1)))
|
||||
;; (defun track-mouse (e))
|
||||
;; (setq mouse-sel-mode t)
|
||||
)
|
||||
(global-set-key (kbd "<mouse-8>") (lambda () (interactive) (previous-buffer)))
|
||||
(global-set-key (kbd "<mouse-9>") (lambda () (interactive) (next-buffer)))
|
||||
;;; Scrolling
|
||||
|
||||
Reference in New Issue
Block a user