Add border
This doesn't work for some reason, maybe it's because I'm on Mac? It might be my machine's fault because lsp-ui's childframe doesn't have border when they clain to do, either. Anyway, the internal-border-width parameter works fine, and internal-border face looks good, too. So I guess the code is ok.
This commit is contained in:
parent
a5d2a7eccd
commit
9a6c21b644
@ -32,6 +32,10 @@
|
||||
;;;; Userland
|
||||
;;;;; Variable
|
||||
|
||||
(defface eglot-doc-border '((((background dark)) . (:background "white"))
|
||||
(((background light)) . (:background "dark")))
|
||||
"The border color used in childframe.")
|
||||
|
||||
(defvar eglot-doc-frame-parameters
|
||||
'(
|
||||
;; (left . -1)
|
||||
@ -138,6 +142,7 @@ Checkout `lsp-ui-doc--make-frame', `lsp-ui-doc--move-frame'."
|
||||
(main-frame (selected-frame)))
|
||||
(set-window-dedicated-p window t)
|
||||
(redirect-frame-focus frame (frame-parent frame))
|
||||
(set-face-attribute 'internal-border frame :inherit 'eglot-doc-border)
|
||||
;; set size
|
||||
(let* ((size
|
||||
(window-text-pixel-size
|
||||
|
Loading…
Reference in New Issue
Block a user