Remove default font detection from doom-doctor
This commit is contained in:
parent
40a1aaae8e
commit
bc358bbc7e
1 changed files with 0 additions and 11 deletions
|
@ -145,17 +145,6 @@
|
||||||
(warn! "Warning: unable to detect font")
|
(warn! "Warning: unable to detect font")
|
||||||
(explain! "The `find-font' function is missing. This could indicate the incorrect "
|
(explain! "The `find-font' function is missing. This could indicate the incorrect "
|
||||||
"version of Emacs is being used!"))
|
"version of Emacs is being used!"))
|
||||||
(defun -find-font (family)
|
|
||||||
(when (fontp family)
|
|
||||||
(setq family (symbol-name (font-get doom-font :family))))
|
|
||||||
(let ((inhibit-message t))
|
|
||||||
(shell-command (format "fc-list | grep %s" (shell-quote-argument family)))))
|
|
||||||
|
|
||||||
(when (boundp 'doom-font)
|
|
||||||
(if (-find-font doom-font)
|
|
||||||
(success! "Found font %s" (font-get doom-font :family))
|
|
||||||
(warn! "Warning: couldn't find %s font (default) (%s)"
|
|
||||||
(font-get doom-font :family))))
|
|
||||||
;; all-the-icons fonts
|
;; all-the-icons fonts
|
||||||
(let ((font-dest (pcase system-type
|
(let ((font-dest (pcase system-type
|
||||||
('gnu/linux (concat (or (getenv "XDG_DATA_HOME")
|
('gnu/linux (concat (or (getenv "XDG_DATA_HOME")
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue