summary refs log tree commit diff stats
path: root/lisp
diff options
context:
space:
mode:
authorCase Duckworth2021-10-06 16:28:26 -0500
committerCase Duckworth2021-10-06 16:28:26 -0500
commitc434a7623d27ce855449fec81a1a8a69fbccdd78 (patch)
tree373a76e7903061f9423087025f6b720140caca45 /lisp
parentMerge branch 'main' of https://github.com/duckwork/.emacs.d (diff)
downloademacs-c434a7623d27ce855449fec81a1a8a69fbccdd78.tar.gz
emacs-c434a7623d27ce855449fec81a1a8a69fbccdd78.zip
Add nyan-mode
IĀ forked it to improve it!
Diffstat (limited to 'lisp')
-rw-r--r--lisp/acdw-modeline.el7
1 files changed, 7 insertions, 0 deletions
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')."
82 (minions-minor-modes-menu))))) 82 (minions-minor-modes-menu)))))
83 'mouse-face 'mode-line-highlight))) 83 'mouse-face 'mode-line-highlight)))
84 84
85(defun acdw-modeline/nyan-cat ()
86 "Display the nyan cat from function `nyan-mode' in the mode-line."
87 (when (and (bound-and-true-p nyan-mode)
88 (eq (bound-and-true-p actually-selected-window)
89 (get-buffer-window)))
90 '(" " (:eval (list (nyan-create))))))
91
85(defun acdw-modeline/modified () ; modified from `simple-modeline' 92(defun acdw-modeline/modified () ; modified from `simple-modeline'
86 "Displays a color-coded buffer modification/read-only 93 "Displays a color-coded buffer modification/read-only
87indicator in the mode-line." 94indicator in the mode-line."