diff options
| author | David Morgan <djm_uk@protonmail.com> | 2022-11-30 16:16:34 +0000 |
|---|---|---|
| committer | David Morgan <djm_uk@protonmail.com> | 2022-11-30 16:16:34 +0000 |
| commit | 2281d0164b6309f45e3e6325183dafa453b6b1ce (patch) | |
| tree | a67366a41fc15479985f41e85dee7e5ca3e09d18 /.emacs.d | |
| parent | 20f89f0489a972548fc717d1c5920e4579eccb3a (diff) | |
| download | dotfiles-2281d0164b6309f45e3e6325183dafa453b6b1ce.tar.gz | |
Add more modes to beacon-dont-blink-major-modes
Diffstat (limited to '.emacs.d')
| -rw-r--r-- | .emacs.d/lisp/init-packages.el | 10 | ||||
| -rw-r--r-- | .emacs.d/lisp/init-ui.el | 2 |
2 files changed, 11 insertions, 1 deletions
diff --git a/.emacs.d/lisp/init-packages.el b/.emacs.d/lisp/init-packages.el index e901d29..e480c3a 100644 --- a/.emacs.d/lisp/init-packages.el +++ b/.emacs.d/lisp/init-packages.el @@ -67,5 +67,15 @@ (setq-local force-reload t) (straight-thaw-versions)) +(defun add-to-list* (list-var &rest elts) + "Add `ELTS' to `LIST-VAR'." + (dolist (elt elts) + (add-to-list list-var elt))) + +(defun append-to-list* (list-var &rest elts) + "Append `ELTS' to `LIST-VAR'." + (dolist (elt elts) + (add-to-list list-var elt t))) + (provide 'init-packages) ;;; init-packages.el ends here diff --git a/.emacs.d/lisp/init-ui.el b/.emacs.d/lisp/init-ui.el index b5424e1..e66030f 100644 --- a/.emacs.d/lisp/init-ui.el +++ b/.emacs.d/lisp/init-ui.el @@ -197,7 +197,7 @@ (beacon-blink-when-focused t) :bind ("C-c c b" . beacon-blink) :config - (add-to-list 'beacon-dont-blink-major-modes 'cider-repl-mode t) + (append-to-list* 'beacon-dont-blink-major-modes 'cider-repl-mode 'eshell-mode 'shell-mode 'vterm-mode 'term-mode 'ansi-term-mode) (beacon-mode 1)) (use-package helpful |