diff --git a/core/core-fonts-support.el b/core/core-fonts-support.el index 3d09c1fff..90f620fa2 100644 --- a/core/core-fonts-support.el +++ b/core/core-fonts-support.el @@ -23,6 +23,7 @@ PLIST has the form (\"fontname\" :prop1 val1 :prop2 val2 ...)" (spacemacs/mplist-remove props :powerline-scale) :powerline-offset)) (fontspec (apply 'font-spec :family font font-props))) + (spacemacs/message "Setting font \"%s\"..." font) (set-default-font fontspec nil t) (setq-default powerline-scale scale) (setq-default powerline-height (spacemacs/compute-powerline-height)) diff --git a/core/core-spacemacs-mode.el b/core/core-spacemacs-mode.el index 3c54bce79..0f38afbd4 100644 --- a/core/core-spacemacs-mode.el +++ b/core/core-spacemacs-mode.el @@ -90,8 +90,10 @@ "able to launch a graphical instance of Emacs" "with this build."))) ;; font - (when (member (car dotspacemacs-default-font) (font-family-list)) - (spacemacs/set-default-font dotspacemacs-default-font)) + (if (find-font (font-spec :name (car dotspacemacs-default-font))) + (spacemacs/set-default-font dotspacemacs-default-font) + (spacemacs/message "Warning: Cannot find font \"%s\"!" + (car dotspacemacs-default-font))) ;; banner (spacemacs//insert-banner) ;; bind-key is required by use-package