emacs: fix face attribute setting
This commit is contained in:
parent
9978a833db
commit
13205c7a27
1 changed files with 11 additions and 10 deletions
|
@ -225,20 +225,21 @@ value `italic'."
|
||||||
(require 'cus-edit) ; custom faces
|
(require 'cus-edit) ; custom faces
|
||||||
(let
|
(let
|
||||||
((fixedpt "Roboto Mono")
|
((fixedpt "Roboto Mono")
|
||||||
( varpt "Roboto"))
|
( varpt "Roboto")
|
||||||
|
( accent "#89b4fa"))
|
||||||
(add-to-list 'default-frame-alist (cons 'font fixedpt))
|
(add-to-list 'default-frame-alist (cons 'font fixedpt))
|
||||||
(set-face-attributes
|
(set-face-attributes
|
||||||
'((default :height 140)
|
`((default :height 140)
|
||||||
(fixed-pitch :family fixedpt)
|
(fixed-pitch :family ,fixedpt)
|
||||||
(variable-pitch :family varpt)
|
(variable-pitch :family ,varpt)
|
||||||
(fixed-pitch :family fixedpt :weight regular)
|
(fixed-pitch :family ,fixedpt :weight regular)
|
||||||
(font-lock-comment-face :slant italic)
|
(font-lock-comment-face :slant italic)
|
||||||
(font-lock-keyword-face :slant italic)
|
(font-lock-keyword-face :slant italic)
|
||||||
(link :foreground "#89b4fa" :underline t)
|
(link :foreground ,accent :underline t)
|
||||||
(help-key-binding
|
(help-key-binding
|
||||||
:family fixedpt
|
:family ,fixedpt
|
||||||
:background "#181825"
|
:background "#181825"
|
||||||
:foreground "#89b4fa"
|
:foreground ,accent
|
||||||
:box (:line-width (-1 . -1) :color "#11111b" :style nil))
|
:box (:line-width (-1 . -1) :color "#11111b" :style nil))
|
||||||
(widget-field
|
(widget-field
|
||||||
:extend t
|
:extend t
|
||||||
|
@ -253,8 +254,8 @@ value `italic'."
|
||||||
:box (:line-width (1 . 1) :color "#11111b"))
|
:box (:line-width (1 . 1) :color "#11111b"))
|
||||||
(info-xref :inherit link
|
(info-xref :inherit link
|
||||||
:background "#181825"
|
:background "#181825"
|
||||||
:foreground "#cdd6f4")
|
:foreground ,accent)
|
||||||
(anzu-mode-line :foreground "#89b4fa"))))
|
(anzu-mode-line :foreground ,accent))))
|
||||||
|
|
||||||
;; custom
|
;; custom
|
||||||
(setq custom-file "~/.emacs.d/custom.el")
|
(setq custom-file "~/.emacs.d/custom.el")
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue