jessieh/eldoc-frame
jessieh/eldoc-frame
1
Fork 0
Code Issues Pull Requests Releases Activity

Add border

Browse Source 
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:
Yuan Fu 2018-12-10 21:02:24 -05:00
parent a5d2a7eccd
commit 9a6c21b644
No known key found for this signature in database
GPG Key ID: 1CF5ECABEC37A901
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
eglot-doc.el
View File

@ -32,6 +32,10 @@
;;;; Userland ;;;; Userland
;;;;; Variable ;;;;; Variable
(defface eglot-doc-border '((((background dark)) . (:background "white"))
(((background light)) . (:background "dark")))
"The border color used in childframe.")
(defvar eglot-doc-frame-parameters (defvar eglot-doc-frame-parameters
'( '(
;; (left . -1) ;; (left . -1)
@ -138,6 +142,7 @@ Checkout `lsp-ui-doc--make-frame', `lsp-ui-doc--move-frame'."
(main-frame (selected-frame))) (main-frame (selected-frame)))
(set-window-dedicated-p window t) (set-window-dedicated-p window t)
(redirect-frame-focus frame (frame-parent frame)) (redirect-frame-focus frame (frame-parent frame))
(set-face-attribute 'internal-border frame :inherit 'eglot-doc-border)
;; set size ;; set size
(let* ((size (let* ((size
(window-text-pixel-size (window-text-pixel-size