mirror of
https://github.com/pestctrl/emacs-config.git
synced 2026-02-16 08:14:15 +00:00
Copy doom faces so exwm doesn't crash
This commit is contained in:
parent
75b7d52b2f
commit
8143ccfe76
1 changed files with 13 additions and 9 deletions
|
|
@ -722,15 +722,19 @@
|
|||
Finally, apply any relevant face attributes found amongst the
|
||||
frame parameters in PARAMETERS."
|
||||
;; The `reverse' is so that `default' goes first.
|
||||
;; (dolist (face (nreverse (face-list)))
|
||||
;; (condition-case ()
|
||||
;; (progn
|
||||
;; ;; Initialize faces from face spec and custom theme.
|
||||
;; (face-spec-recalc face frame)
|
||||
;; ;; Apply attributes specified by face-new-frame-defaults
|
||||
;; (internal-merge-in-global-face face frame))
|
||||
;; ;; Don't let invalid specs prevent frame creation.
|
||||
;; (error nil)))
|
||||
(dolist (face (remove-if-not (lambda (x)
|
||||
(let ((name (symbol-name x)))
|
||||
(string-match-p "^doom-.*"
|
||||
name)))
|
||||
(nreverse (face-list))))
|
||||
(condition-case ()
|
||||
(progn
|
||||
;; Initialize faces from face spec and custom theme.
|
||||
(face-spec-recalc face frame)
|
||||
;; Apply attributes specified by face-new-frame-defaults
|
||||
(internal-merge-in-global-face face frame))
|
||||
;; Don't let invalid specs prevent frame creation.
|
||||
(error nil)))
|
||||
|
||||
;; Apply attributes specified by frame parameters.
|
||||
(let ((face-params '((foreground-color default :foreground)
|
||||
|
|
|
|||
Loading…
Reference in a new issue