From: Po Lu <luangruo@yahoo.com>
Date: Tue, 10 May 2022 13:07:53 +0000 (+0800)
Subject: Respect `alpha-background' drawing relief corners
X-Git-Tag: emacs-29.0.90~1910^2~841^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=77bf4ca000b4d1c901907c774e7bb342b6f24f1e;p=emacs.git

Respect `alpha-background' drawing relief corners

* src/xterm.c (x_draw_relief_rect): Respect background alpha for
corner rects.
---

diff --git a/src/xterm.c b/src/xterm.c
index 40c80eb1f70..d44554df7b8 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -7614,19 +7614,25 @@ x_draw_relief_rect (struct frame *f, int left_x, int top_y, int right_x,
     {
       if (left_p && top_p && x_inside_rect_p (clip_rect, 1,
 					      left_x, top_y))
-	x_clear_rectangle (f, normal_gc, left_x, top_y, 1, 1, false);
+	/* This should respect `alpha-backgroun' since it's being
+	   cleared with the background color of the frame.  */
+	x_clear_rectangle (f, normal_gc, left_x, top_y, 1, 1,
+			   true);
 
       if (left_p && bot_p && x_inside_rect_p (clip_rect, 1,
 					      left_x, bottom_y))
-	x_clear_rectangle (f, normal_gc, left_x, bottom_y, 1, 1, false);
+	x_clear_rectangle (f, normal_gc, left_x, bottom_y, 1, 1,
+			   true);
 
       if (right_p && top_p && x_inside_rect_p (clip_rect, 1,
 					       right_x, top_y))
-	x_clear_rectangle (f, normal_gc, right_x, top_y, 1, 1, false);
+	x_clear_rectangle (f, normal_gc, right_x, top_y, 1, 1,
+			   true);
 
       if (right_p && bot_p && x_inside_rect_p (clip_rect, 1,
 					       right_x, bottom_y))
-	x_clear_rectangle (f, normal_gc, right_x, bottom_y, 1, 1, false);
+	x_clear_rectangle (f, normal_gc, right_x, bottom_y, 1, 1,
+			   true);
     }
 
   x_reset_clip_rectangles (f, white_gc);