fix mouse-mode for terminals

This commit is contained in:
2025-06-18 16:04:41 +02:00
parent beb2daaf06
commit 612300aef0

View File

@@ -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