From: Po Lu <luangruo@yahoo.com>
Date: Fri, 4 Feb 2022 12:10:30 +0000 (+0000)
Subject: Implement auto-raise on Haiku
X-Git-Tag: emacs-29.0.90~2534
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=279f3c6d602fe7d43df20db2775b204b2c5bfe3c;p=emacs.git

Implement auto-raise on Haiku

* src/haikuterm.c (haiku_read_socket): Implement auto-raising
of frames that have that parameter set.
---

diff --git a/src/haikuterm.c b/src/haikuterm.c
index e8c734d6711..5d90acb4434 100644
--- a/src/haikuterm.c
+++ b/src/haikuterm.c
@@ -2811,6 +2811,12 @@ haiku_read_socket (struct terminal *terminal, struct input_event *hold_quit)
 		    last_mouse_window = window;
 		  }
 
+		if (f->auto_raise)
+		  {
+		    if (!BWindow_is_active (FRAME_HAIKU_WINDOW (f)))
+		      haiku_frame_raise_lower (f, 1);
+		  }
+
 		if (!NILP (help_echo_string)
 		    || !NILP (previous_help_echo_string))
 		  do_help = 1;