diff --git a/doom-modeline.el b/doom-modeline.el index bb31233..cf0db07 100644 --- a/doom-modeline.el +++ b/doom-modeline.el @@ -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 diff --git a/test/test-helper.el b/test/test-helper.el index 586228f..a36041e 100644 --- a/test/test-helper.el +++ b/test/test-helper.el @@ -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