github/doom-modeline
1
0
Fork 0
mirror of https://github.com/correl/doom-modeline.git synced 2024-12-26 19:16:54 +00:00
Code Issues Projects Releases Packages Wiki Activity

Fix: incorrect height of eldoc bar.

Browse source
This commit is contained in:
Vincent Zhang 2018-12-22 14:23:43 +08:00
parent 3f5feb3c7f
commit 22b9943438
2 changed files with 7 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
doom-modeline.el
View file

@ -289,7 +289,7 @@ It returns a file name which can be used directly as argument of
(defface doom-modeline-bar '((t (:inherit highlight)))
"The face used for the left-most bar on the mode-line of an active window.")
(defface doom-modeline-eldoc-bar '((t (:inherit shadow)))
(defface doom-modeline-eldoc-bar '((t (:inherit highlight)))
"The face used for the left-most bar on the mode-line when eldoc-eval is
active.")
@ -439,10 +439,10 @@ If DEFAULT is non-nil, set the default mode-line for all buffers."
(defun doom-modeline-eldoc (text)
"Get eldoc TEXT for mode-line."
(concat (when (display-graphic-p)
(doom-modeline--make-xpm 'doom-modeline-eldoc-bar
doom-modeline-height
doom-modeline-bar-width))
(concat (doom-modeline--make-xpm 'doom-modeline-eldoc-bar
doom-modeline-bar-width
doom-modeline-height)
" "
text))
;; Show eldoc in the mode-line with `eval-expression'

4
test/test-helper.el
View file

@ -30,11 +30,11 @@
;;
;;; Code:
(require 'doom-modeline (expand-file-name "doom-modeline.el"))
(defun strip-text-properties(txt)
"Strip text properties of TXT."
(set-text-properties 0 (length txt) nil txt)
txt)
(require 'doom-modeline (expand-file-name "doom-modeline.el"))
;;; test-helper.el ends here