aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGerd Möllmann2025-02-24 05:48:29 +0100
committerGerd Möllmann2025-02-24 05:51:41 +0100
commit02fbdbf4ff628fe4ee6112a57d63a14445726215 (patch)
tree099a099b4629c0e2a5cbe5985ee5ed403e8244dc
parent45f5f718a07bb126bbd71952c5fbd1c5f126df7d (diff)
downloademacs-02fbdbf4ff628fe4ee6112a57d63a14445726215.tar.gz
emacs-02fbdbf4ff628fe4ee6112a57d63a14445726215.zip
Handle case of not knowing a frame when mouse moved
* lisp/xt-mouse.el (xterm-mouse--handle-mouse-movement): Don't call display--update-for-mouse-movement if we don't have a frame.
-rw-r--r--lisp/xt-mouse.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/xt-mouse.el b/lisp/xt-mouse.el
index 250f4efebb4..94b3f08de96 100644
--- a/lisp/xt-mouse.el
+++ b/lisp/xt-mouse.el
@@ -133,9 +133,11 @@ https://invisible-island.net/xterm/ctlseqs/ctlseqs.html)."
133 133
134(defun xterm-mouse--handle-mouse-movement () 134(defun xterm-mouse--handle-mouse-movement ()
135 "Handle mouse motion that was just generated for XTerm mouse." 135 "Handle mouse motion that was just generated for XTerm mouse."
136 (display--update-for-mouse-movement (terminal-parameter nil 'xterm-mouse-frame) 136 (when-let* ((frame (terminal-parameter nil 'xterm-mouse-frame)))
137 (terminal-parameter nil 'xterm-mouse-x) 137 (display--update-for-mouse-movement
138 (terminal-parameter nil 'xterm-mouse-y))) 138 frame
139 (terminal-parameter nil 'xterm-mouse-x)
140 (terminal-parameter nil 'xterm-mouse-y))))
139 141
140;; These two variables have been converted to terminal parameters. 142;; These two variables have been converted to terminal parameters.
141;; 143;;