[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master dd8db560c2: Disable tooltip timeouts for drag-and-drop tooltips
From: |
Po Lu |
Subject: |
master dd8db560c2: Disable tooltip timeouts for drag-and-drop tooltips |
Date: |
Thu, 9 Jun 2022 04:44:27 -0400 (EDT) |
branch: master
commit dd8db560c25958f8e3ab9c46d6df560fce7c0a88
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>
Disable tooltip timeouts for drag-and-drop tooltips
* lisp/mouse.el (mouse-drag-and-drop-region-display-tooltip):
Don't time out the created tooltip.
---
lisp/mouse.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/lisp/mouse.el b/lisp/mouse.el
index 11014fa1c5..9cf6635a01 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -3056,7 +3056,10 @@ Call `tooltip-show-help-non-mode' instead on
non-graphical displays."
(setf (alist-get 'border-color params) fg))
(when (stringp bg)
(setf (alist-get 'background-color params) bg))
- (x-show-tip tooltip nil params))
+ ;; Don't time out: this leads to very confusing behavior when
+ ;; Emacs isn't visible, and the only indication that the user
+ ;; is actually dragging something abruptly disappears.
+ (x-show-tip tooltip nil params most-positive-fixnum))
(tooltip-show-help-non-mode tooltip)))
(declare-function x-hide-tip "xfns.c")
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master dd8db560c2: Disable tooltip timeouts for drag-and-drop tooltips,
Po Lu <=