From c434a7623d27ce855449fec81a1a8a69fbccdd78 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Wed, 6 Oct 2021 16:28:26 -0500 Subject: Add nyan-mode IĀ forked it to improve it! --- lisp/acdw-modeline.el | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'lisp') diff --git a/lisp/acdw-modeline.el b/lisp/acdw-modeline.el index 573a964..a9020c5 100644 --- a/lisp/acdw-modeline.el +++ b/lisp/acdw-modeline.el @@ -82,6 +82,13 @@ Otherwise, cdr should be a function that takes two points (see `count-words')." (minions-minor-modes-menu))))) 'mouse-face 'mode-line-highlight))) +(defun acdw-modeline/nyan-cat () + "Display the nyan cat from function `nyan-mode' in the mode-line." + (when (and (bound-and-true-p nyan-mode) + (eq (bound-and-true-p actually-selected-window) + (get-buffer-window))) + '(" " (:eval (list (nyan-create)))))) + (defun acdw-modeline/modified () ; modified from `simple-modeline' "Displays a color-coded buffer modification/read-only indicator in the mode-line." -- cgit 1.4.1-21-gabe81