From 13d207d40863a041b84c34f075668c7931db5a78 Mon Sep 17 00:00:00 2001
From: Doug Davis <ddavis@ddavis.io>
Date: Sat, 22 May 2021 14:10:04 -0400
Subject: [PATCH] fix child border in Emacs 28

* eldoc-box.el (eldoc-box--get-frame): Set child-frame-border's
background to border color.
---
 eldoc-box.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/eldoc-box.el b/eldoc-box.el
index 7b7582e..63999e7 100644
--- a/eldoc-box.el
+++ b/eldoc-box.el
@@ -331,6 +331,10 @@ Checkout `lsp-ui-doc--make-frame', `lsp-ui-doc--move-frame'."
       (set-window-dedicated-p window t)
       (redirect-frame-focus frame (frame-parent frame))
       (set-face-attribute 'internal-border frame :inherit 'eldoc-box-border)
+      (when (facep 'child-frame-border)
+        (set-face-background 'child-frame-border
+                             (face-attribute 'eldoc-box-border :background)
+                             frame))
       ;; set size
       (eldoc-box--update-childframe-geometry frame window)
       (setq eldoc-box--frame frame)