From: Po Lu <luangruo@yahoo.com>
Date: Wed, 20 Apr 2022 11:47:10 +0000 (+0000)
Subject: Implement `below' z-group on Haiku
X-Git-Tag: emacs-29.0.90~1931^2~387
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=30812fc08474980580996ec5e204aec116c3765b;p=emacs.git

Implement `below' z-group on Haiku

* src/haiku_support.cc (BWindow_set_z_group): Handle
Z_GROUP_BELOW by setting the B_AVOID_FRONT flag.
---

diff --git a/src/haiku_support.cc b/src/haiku_support.cc
index 18a63182162..3dc9eb88b73 100644
--- a/src/haiku_support.cc
+++ b/src/haiku_support.cc
@@ -4317,6 +4317,11 @@ BWindow_set_z_group (void *window, enum haiku_z_group z_group)
 	{
 	  w->z_group = z_group;
 	  w->RecomputeFeel ();
+
+	  if (w->z_group == Z_GROUP_BELOW)
+	    w->SetFlags (w->Flags () | B_AVOID_FRONT);
+	  else
+	    w->SetFlags (w->Flags () & ~B_AVOID_FRONT);
 	}
 
       w->UnlockLooper ();