diff options
| author | Po Lu | 2022-05-13 20:57:24 +0800 |
|---|---|---|
| committer | Po Lu | 2022-05-13 20:57:24 +0800 |
| commit | f044da7704edfc7e6cf32606328d0735b77e60d9 (patch) | |
| tree | 69675424e5b67c3d047a415d98e93253a1ceaf33 | |
| parent | a769cbfcfb6e9603bcd15e90f387207f8c061bf1 (diff) | |
| download | emacs-f044da7704edfc7e6cf32606328d0735b77e60d9.tar.gz emacs-f044da7704edfc7e6cf32606328d0735b77e60d9.zip | |
Fix tooltip face overwriting dragged text strings during mouse DND
* lisp/mouse.el (mouse-drag-and-drop-region): Copy
`text-tooltip' before showing it. Do not merge to master.
| -rw-r--r-- | lisp/mouse.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index 1b9542b9b82..e5ea5475f43 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el | |||
| @@ -3049,7 +3049,7 @@ is copied instead of being cut." | |||
| 3049 | 3049 | ||
| 3050 | ;; Show a tooltip. | 3050 | ;; Show a tooltip. |
| 3051 | (if mouse-drag-and-drop-region-show-tooltip | 3051 | (if mouse-drag-and-drop-region-show-tooltip |
| 3052 | (tooltip-show text-tooltip) | 3052 | (tooltip-show (copy-sequence text-tooltip)) |
| 3053 | (tooltip-hide)) | 3053 | (tooltip-hide)) |
| 3054 | 3054 | ||
| 3055 | ;; Show cursor and highlight the original region. | 3055 | ;; Show cursor and highlight the original region. |