tastytea/.emacs.d
tastytea/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Releases Activity

highlight-parentheses: Fix face assignment.

Browse Source
This commit is contained in:
tastytea 2021-08-23 15:15:52 +02:00
parent b07b175f15
commit e5460c1646
Signed by: tastytea
GPG Key ID: CFC39497F1B26E07
1 changed files with 13 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
init.d/basics/appearance.el
View File

@ -80,7 +80,9 @@
(my/volatile-highlights-reset-color)) (my/volatile-highlights-reset-color))
(my/set-default-fonts) (my/set-default-fonts)
(when (display-graphic-p) (when (display-graphic-p)
(setq my/run-fix-theme nil)))) (setq my/run-fix-theme nil))
(when (fboundp #'my/hl-paren-set-faces)
(my/hl-paren-set-faces))))
(load-theme 'doom-outrun-electric t) (load-theme 'doom-outrun-electric t)
(my/fix-theme) (my/fix-theme)
@ -136,7 +138,7 @@
;; Visualize and transform whitespace. ;; Visualize and transform whitespace.
(use-package whitespace (use-package whitespace
:after (company) :after (company doom-themes)
:functions (my/on-off-whitespace-before-company) :functions (my/on-off-whitespace-before-company)
:diminish whitespace-mode :diminish whitespace-mode
:custom (whitespace-line-column nil) ; Set to fill-column. :custom (whitespace-line-column nil) ; Set to fill-column.
@ -208,11 +210,15 @@
:demand t :demand t
:diminish (highlight-parentheses-mode) :diminish (highlight-parentheses-mode)
:custom ((highlight-parentheses-colors nil) :custom ((highlight-parentheses-colors nil)
(highlight-parentheses-background-colors nil) (highlight-parentheses-background-colors nil))
(highlight-parentheses-attributes :config (progn(global-highlight-parentheses-mode)
`((:weight bold :background ,(face-foreground 'whitespace-space)) (defun my/hl-paren-set-faces ()
(:weight ultrabold)))) "Faces have to be set after the first frame is created."
:config (global-highlight-parentheses-mode) (customize-set-variable
'highlight-parentheses-attributes
`((:weight bold :background
,(face-foreground 'whitespace-space))
(:weight ultrabold)))))
:hook (minibuffer-setup . highlight-parentheses-minibuffer-setup)) :hook (minibuffer-setup . highlight-parentheses-minibuffer-setup))
(provide 'basics/appearance) (provide 'basics/appearance)