From: Po Lu <luangruo@yahoo.com>
Date: Mon, 18 Jul 2022 04:49:46 +0000 (+0000)
Subject: Implement last change on Haiku as well
X-Git-Tag: emacs-29.0.90~1447^2~871
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7b259b2eb17d0b912f7a674a5f6189abab4914d8;p=emacs.git

Implement last change on Haiku as well

* lisp/term/haiku-win.el (haiku-dnd-drag-handler): Stop
redisplaying here.
* src/haikuselect.c (haiku_note_drag_motion): Use
redisplay_preserve_echo_area.
---

diff --git a/lisp/term/haiku-win.el b/lisp/term/haiku-win.el
index b36e3037ee8..abcef773180 100644
--- a/lisp/term/haiku-win.el
+++ b/lisp/term/haiku-win.el
@@ -409,8 +409,7 @@ take effect on menu items until the menu bar is updated again."
     (when (car mouse-position)
       (dnd-handle-movement (posn-at-x-y (cadr mouse-position)
                                         (cddr mouse-position)
-                                        (car mouse-position)))
-      (redisplay))))
+                                        (car mouse-position))))))
 
 (setq haiku-drag-track-function #'haiku-dnd-drag-handler)
 
diff --git a/src/haikuselect.c b/src/haikuselect.c
index dc0a7edf430..daad98da2b4 100644
--- a/src/haikuselect.c
+++ b/src/haikuselect.c
@@ -1030,6 +1030,11 @@ haiku_note_drag_motion (void)
 
   internal_catch_all (haiku_note_drag_motion_1, NULL,
 		      haiku_note_drag_motion_2);
+
+  /* Redisplay this way to preserve the echo area.  Otherwise, the
+     contents will abruptly disappear when the mouse moves over a
+     frame.  */
+  redisplay_preserve_echo_area (34);
 }
 
 void