fix child border in Emacs 28

* eldoc-box.el (eldoc-box--get-frame): Set child-frame-border's background to border color.
2021-05-22 14:10:04 -04:00 · 2021-05-22 14:10:04 -04:00 · 13d207d408
commit 13d207d408
parent f66f8d0641
1 changed files with 4 additions and 0 deletions
--- 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)