branch: externals/modus-operandi-theme commit 91ce02b12791a61c35e45b5a44ea80b708744a23 Author: Protesilaos Stavrou <i...@protesilaos.com> Commit: Protesilaos Stavrou <i...@protesilaos.com>
Expand README on face customisation --- README.org | 32 ++++++++++++++++++++++++++++++++ 1 file changed, 32 insertions(+) diff --git a/README.org b/README.org index 0a31c36..ef72bda 100644 --- a/README.org +++ b/README.org @@ -440,6 +440,38 @@ Len's sample package declaration (with comments by me): (load-theme 'modus-vivendi t)) ; load the theme #+end_src +Perhaps you want something simpler, such as a nice style for the cursor: + +#+begin_src emacs-lisp +(modus-operandi-theme-with-color-variables + (custom-theme-set-faces + 'modus-operandi + `(cursor ((t (:background ,blue-alt)))))) + +(modus-vivendi-theme-with-color-variables + (custom-theme-set-faces + 'modus-vivendi + `(cursor ((t (:background ,red-alt)))))) +#+end_src + +The code for the bespoke =after-load-theme-hook= could be something like +the following (courtesy of the [[https://github.com/seagle0128/.emacs.d/blob/master/lisp/init-funcs.el][Centaur Emacs project]]): + +#+begin_src emacs-lisp +(defvar after-load-theme-hook nil + "Hook run after a color theme is loaded using `load-theme'.") + +(defun run-after-load-theme-hook (&rest _) + "Run `after-load-theme-hook'." + (run-hooks 'after-load-theme-hook)) + +(advice-add #'load-theme :after #'run-after-load-theme-hook) +#+end_src + +If you need more ideas check how I configure the themes in [[https://gitlab.com/protesilaos/dotemacs][my dotemacs]]. +If something is not clear or not working as intended, please let me +know. + *** Further considerations :PROPERTIES: :CUSTOM_ID: h:4acda0f1-564e-48ff-8998-ebf7618377dd