daniel/emacs
1
2
Fork 0
Code Issues 7 Pull Requests Projects Releases Wiki Activity

fix mouse-mode for terminals

Browse Source
This commit is contained in:
Daniel Weschke
2025-06-18 16:04:41 +02:00
parent beb2daaf06
commit 612300aef0
1 changed files with 10 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
settings/general-settings.el
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 ;; 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) (unless (display-graphic-p)
(require 'mouse) ;; (require 'mouse)
(require 'xt-mouse)
(xterm-mouse-mode t) (xterm-mouse-mode t)
(global-set-key [mouse-4] (lambda () (interactive) (scroll-down 1))) (global-set-key (kbd "<wheel-up>") 'scroll-down-line)
(global-set-key [mouse-5] (lambda () (interactive) (scroll-up 1))) (global-set-key (kbd "<wheel-down>") 'scroll-up-line)
(defun track-mouse (e)) ;; still needed?
(setq mouse-sel-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 "<mouse-8>") (lambda () (interactive) (previous-buffer))) (global-set-key (kbd "<mouse-8>") (lambda () (interactive) (previous-buffer)))
(global-set-key (kbd "<mouse-9>") (lambda () (interactive) (next-buffer))) (global-set-key (kbd "<mouse-9>") (lambda () (interactive) (next-buffer)))
;;; Scrolling ;;; Scrolling