diff options
author | Po Lu <luangruo@yahoo.com> | 2022-06-21 09:35:07 +0800 |
---|---|---|
committer | Po Lu <luangruo@yahoo.com> | 2022-06-21 09:35:07 +0800 |
commit | 32a6d52d43b4c3452687a11b01dfb51ba111fee2 (patch) | |
tree | 34d247115bb6e44525b78b4c88c09d50d3b20f72 /lisp/term | |
parent | 256fac4886579ec164a1baf84f6059687296b1dd (diff) | |
download | emacs-32a6d52d43b4c3452687a11b01dfb51ba111fee2.tar.gz emacs-32a6d52d43b4c3452687a11b01dfb51ba111fee2.tar.bz2 emacs-32a6d52d43b4c3452687a11b01dfb51ba111fee2.zip |
Move selection delayed message to a better location
* lisp/term/x-win.el (gui-backend-get-selection): Remove
`with-delayed-message' here.
* src/xselect.c (x_display_selection_waiting_message)
(x_cancel_atimer): New functions.
(x_get_foreign_selection): Add an atimer that displays the
message after a while.
Diffstat (limited to 'lisp/term')
-rw-r--r-- | lisp/term/x-win.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index 6e083499df4..32675a07b1f 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el @@ -1366,9 +1366,8 @@ This returns an error if any Emacs frames are X frames." (cl-defmethod gui-backend-get-selection (selection-symbol target-type &context (window-system x) &optional time-stamp terminal) - (with-delayed-message (1 "Waiting for selection") - (x-get-selection-internal selection-symbol target-type - time-stamp terminal))) + (x-get-selection-internal selection-symbol target-type + time-stamp terminal)) ;; Initiate drag and drop (add-hook 'after-make-frame-functions 'x-dnd-init-frame) |