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.
2022-05-13 20:57:24 +08:00
parent a769cbfcfb
commit f044da7704
1 changed files with 1 additions and 1 deletions
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -3049,7 +3049,7 @@ is copied instead of being cut."

          ;; Show a tooltip.
          (if mouse-drag-and-drop-region-show-tooltip
-              (tooltip-show text-tooltip)
+              (tooltip-show (copy-sequence text-tooltip))
            (tooltip-hide))

          ;; Show cursor and highlight the original region.