diff options
author | Po Lu <luangruo@yahoo.com> | 2022-06-09 16:34:18 +0800 |
---|---|---|
committer | Po Lu <luangruo@yahoo.com> | 2022-06-09 16:34:18 +0800 |
commit | e7ac2ac4e07d3fd6fee4a74a9cfc5bac9310fc18 (patch) | |
tree | 2cf1ab3a6a41efbeaba620441cb3ace30bd48a3e /lisp/term/ns-win.el | |
parent | 0ba43e15d9c9ffb3df8aeb3a7e446d9a4d62ccff (diff) | |
download | emacs-e7ac2ac4e07d3fd6fee4a74a9cfc5bac9310fc18.tar.gz |
Implement `follow-tooltip' on NS as well
* lisp/term/ns-win.el (x-begin-drag): Pass `follow-tooltip'.
* src/nsfns.m (Fx_show_tip): Record last dx and dy.
(syms_of_nsfns): New staticpros.
* src/nsmenu.m ([EmacsTooltip moveTo:]): New method.
* src/nsselect.m (Fns_begin_drag): New parameter
`follow-tooltip'.
* src/nsterm.h (@interface EmacsWindow):
(EmacsTooltip): Update prototypes.
* src/nsterm.m ([EmacsWindow draggedImage:movedTo:]): Move any
tooltip to the right location.
([EmacsWindow beginDrag:forPasteboard...]): New parameter
`followTooltip'.
Diffstat (limited to 'lisp/term/ns-win.el')
-rw-r--r-- | lisp/term/ns-win.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el index 0d46a895ce8..ac1007f94fe 100644 --- a/lisp/term/ns-win.el +++ b/lisp/term/ns-win.el @@ -896,7 +896,7 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.") (ns-get-selection selection-symbol target-type)) (defun x-begin-drag (targets &optional action frame return-frame - allow-current-frame _follow-tooltip) + allow-current-frame follow-tooltip) "SKIP: real doc in xfns.c." (unless ns-dnd-selection-value (error "No local value for XdndSelection")) @@ -921,7 +921,8 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.") (expand-file-name ns-dnd-selection-value)))) pasteboard)))) - (ns-begin-drag frame pasteboard action return-frame allow-current-frame))) + (ns-begin-drag frame pasteboard action return-frame + allow-current-frame follow-tooltip))) (defun ns-handle-drag-motion (frame x y) "Handle mouse movement on FRAME at X and Y during drag-and-drop. |