]> git.eshelyaron.com Git - emacs.git/commitdiff
Handle case of not knowing a frame when mouse moved
authorGerd Möllmann <gerd.moellmann@gmail.com>
Mon, 24 Feb 2025 04:48:29 +0000 (05:48 +0100)
committerEshel Yaron <me@eshelyaron.com>
Wed, 26 Feb 2025 09:33:37 +0000 (10:33 +0100)
* lisp/xt-mouse.el (xterm-mouse--handle-mouse-movement): Don't call
display--update-for-mouse-movement if we don't have a frame.

(cherry picked from commit 02fbdbf4ff628fe4ee6112a57d63a14445726215)

lisp/xt-mouse.el

index 250f4efebb4ad76c9443d1be0baec52643243f4d..94b3f08de9655d07c108429e0c922feff6d7d8e5 100644 (file)
@@ -133,9 +133,11 @@ https://invisible-island.net/xterm/ctlseqs/ctlseqs.html)."
 
 (defun xterm-mouse--handle-mouse-movement ()
   "Handle mouse motion that was just generated for XTerm mouse."
-  (display--update-for-mouse-movement (terminal-parameter nil 'xterm-mouse-frame)
-                                      (terminal-parameter nil 'xterm-mouse-x)
-                                      (terminal-parameter nil 'xterm-mouse-y)))
+  (when-let* ((frame (terminal-parameter nil 'xterm-mouse-frame)))
+    (display--update-for-mouse-movement
+     frame
+     (terminal-parameter nil 'xterm-mouse-x)
+     (terminal-parameter nil 'xterm-mouse-y))))
 
 ;; These two variables have been converted to terminal parameters.
 ;;