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

Enable users to set font of the childframe

Browse Source 
This step is before resizing.
This commit is contained in:
Yuan Fu 2019-01-04 18:51:37 -05:00
parent c00c447ac5
commit 4f1d227d4d
No known key found for this signature in database
GPG Key ID: 1CF5ECABEC37A901
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
eldoc-box.el
View File

@ -51,7 +51,7 @@
"The border color used in childframe.") "The border color used in childframe.")
(defface eldoc-box-body '((t . (:background nil))) (defface eldoc-box-body '((t . (:background nil)))
"Body face used in eglot doc childframe. Only :background is used.") "Body face used in eglot doc childframe. Only :background and :font are used.")
(defvar eldoc-box-only-multi-line nil (defvar eldoc-box-only-multi-line nil
"If non-nil, only use childframe when there are more than one line.") "If non-nil, only use childframe when there are more than one line.")
@ -245,7 +245,9 @@ Checkout `lsp-ui-doc--make-frame', `lsp-ui-doc--move-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 'eldoc-box-border) (set-face-attribute 'internal-border frame :inherit 'eldoc-box-border)
(set-face-attribute 'default frame :background (face-attribute 'eldoc-box-body :background main-frame)) (set-face-attribute 'default frame
:background (face-attribute 'eldoc-box-body :background main-frame)
:font (face-attribute 'eldoc-box-body :font main-frame))
;; set size ;; set size
(let* ((size (let* ((size
(window-text-pixel-size (window-text-pixel-size