Fix: function definition is void: font-info.

This commit is contained in:
Vincent Zhang 2018-12-22 14:09:02 +08:00
parent 65ea32f20d
commit 3f5feb3c7f
2 changed files with 3 additions and 3 deletions

View file

@ -83,7 +83,9 @@
;;
(defvar doom-modeline-height (let ((font (face-font 'mode-line)))
(if font (* 2 (aref (font-info font) 2)) 25))
(if (and font (fboundp 'font-info))
(* 2 (aref (font-info font) 2))
25))
"How tall the mode-line should be (only respected in GUI Emacs).")
(defvar doom-modeline-bar-width 3

View file

@ -35,8 +35,6 @@
(set-text-properties 0 (length txt) nil txt)
txt)
(defvar doom-modeline-height 26)
(require 'doom-modeline (expand-file-name "doom-modeline.el"))
;;; test-helper.el ends here