Whoops
This commit is contained in:
parent
1f9e75ca62
commit
431fb18d89
1 changed files with 1 additions and 3 deletions
|
|
@ -173,7 +173,7 @@
|
||||||
;;
|
;;
|
||||||
(defun font-candidate (&rest fonts)
|
(defun font-candidate (&rest fonts)
|
||||||
"Return existing font which first match."
|
"Return existing font which first match."
|
||||||
(find-if (lambda (f) (find-font (font-spec :name f))) fonts))
|
(cl-find-if (lambda (f) (find-font (font-spec :name f))) fonts))
|
||||||
|
|
||||||
(setq my-font-choice
|
(setq my-font-choice
|
||||||
(font-candidate
|
(font-candidate
|
||||||
|
|
@ -183,8 +183,6 @@
|
||||||
"Inconsolata-11"
|
"Inconsolata-11"
|
||||||
"Monaco-14"))
|
"Monaco-14"))
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
;; This is just here for playing with things.
|
;; This is just here for playing with things.
|
||||||
(set-frame-font my-font-choice)
|
(set-frame-font my-font-choice)
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue