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