Issue a message if getting a selection takes a long time
* lisp/term/x-win.el (gui-backend-get-selection): If getting the selection takes a long time, issue a message after one second (bug#46935).
This commit is contained in:
parent
c6ff592663
commit
54e3509771
1 changed files with 3 additions and 1 deletions
|
@ -1366,7 +1366,9 @@ 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)
|
||||
(x-get-selection-internal selection-symbol target-type time-stamp terminal))
|
||||
(with-delayed-message (1 "Waiting for selection")
|
||||
(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)
|
||||
|
|
Loading…
Add table
Reference in a new issue