From: Alex <alex.corcoles@veecle.io>
Date: Tue, 3 Sep 2024 12:32:19 +0000 (+0200)
Subject: Silence some mouse hovering noise
X-Git-Tag: 20241020-emacs~73
X-Git-Url: https://xn--ix-yja.es/gitweb/?a=commitdiff_plain;h=73c8e91ae87f17a317e1be3748d0d53e363986de;p=alex.git

Silence some mouse hovering noise
---

diff --git a/emacs/emacs.el b/emacs/emacs.el
index c48dd83..2e0040b 100644
--- a/emacs/emacs.el
+++ b/emacs/emacs.el
@@ -24,6 +24,14 @@
 (require-theme 'modus-themes)
 (load-theme 'modus-vivendi :no-confirm)
 
+;; From https://github.com/emacs-lsp/lsp-ui/issues/607 , silence some mouse hovering noise
+(let ((areas '("mode-line" "left-margin" "left-fringe" "right-fringe" "header-line" "vertical-scroll-bar"))
+          loc)
+      (while areas
+        (setq loc (pop areas))
+        (global-set-key
+         (kbd (concat "<" loc "> <mouse-movement>")) #'ignore)))
+
 (require 'use-package-ensure)
 (setq use-package-always-ensure t)