summary refs log tree commit diff stats
path: root/lisp/acdw-modeline.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/acdw-modeline.el')
-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."