diff options
author | Case Duckworth | 2021-01-24 23:26:00 -0600 |
---|---|---|
committer | Case Duckworth | 2021-01-24 23:26:00 -0600 |
commit | b33c882ba69bf530f5a055bcbab26e392d51e6f5 (patch) | |
tree | 00f8dcb33524f4b1c48b984c86bc773ea7e3f68c | |
parent | Update modus and change the mode-line (diff) | |
download | emacs-b33c882ba69bf530f5a055bcbab26e392d51e6f5.tar.gz emacs-b33c882ba69bf530f5a055bcbab26e392d51e6f5.zip |
Add doremi-face-set for setting face
-rw-r--r-- | config.org | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/config.org b/config.org index d37139c..5ef0f1f 100644 --- a/config.org +++ b/config.org | |||
@@ -470,6 +470,20 @@ minor-modes from the modeline. | |||
470 | :repo "raxod502/blackout")) | 470 | :repo "raxod502/blackout")) |
471 | #+end_src | 471 | #+end_src |
472 | 472 | ||
473 | *** Setting faces | ||
474 | |||
475 | It took me a while to find a function that'll let me customize faces | ||
476 | /without/ using *customize*. Thanks to [[https://www.emacswiki.org/emacs/CustomizingFaces#toc5][Drew Adams]], I've got it! | ||
477 | |||
478 | #+begin_src emacs-lisp :noweb-ref functions | ||
479 | (defun doremi-face-set (face spec) | ||
480 | "Tell Customize that FACE has been set to value SPEC. | ||
481 | SPEC is as for `defface'." | ||
482 | (put face 'customized-face spec) | ||
483 | (face-spec-set face spec) | ||
484 | (message "Customized face %s." (symbol-name face))) | ||
485 | #+end_src | ||
486 | |||
473 | * Interactivity | 487 | * Interactivity |
474 | 488 | ||
475 | ** Dialogs and alerts | 489 | ** Dialogs and alerts |