From c7ef58ec8a4157ac569a755b0090a2e82de0e79b Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Thu, 7 Oct 2021 16:01:24 -0500 Subject: Disable nyan mode sometimes --- init.el | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/init.el b/init.el index aa2bb9a..a633387 100644 --- a/init.el +++ b/init.el @@ -1139,6 +1139,7 @@ specific to most general, they are these: scroll-margin 0 word-wrap t wrap-prefix (repeat-string acdw-irc/left-margin " ") + nyan-mode nil line-number-mode nil column-number-mode nil file-percentage-mode nil) @@ -1860,7 +1861,13 @@ browser defined in `browse-url-secondary-browser-function'." (:option nyan-animate-nyancat nil nyan-bar-length 20 nyan-minimum-window-width fill-column) - (nyan-mode +1)) + (nyan-mode +1) + (defun disable-nyan-mode () + "Disable `nyan-mode' in current buffer." + (setq-local nyan-mode -1)) + (dolist (mode '(eshell-mode + comint-mode)) + (add-hook mode #'disable-nyan-mode))) ;; (setup (:straight olivetti) ;; (:option olivetti-body-width (+ fill-column 4) -- cgit 1.4.1-21-gabe81