summaryrefslogtreecommitdiff
path: root/modeline.el
diff options
context:
space:
mode:
authorJSDurand <mmemmew@gmail.com>2022-01-12 19:23:39 +0800
committerJSDurand <mmemmew@gmail.com>2022-01-12 19:23:39 +0800
commitbde550449375a9f5f6dbc652cce2e017de9df835 (patch)
tree053cca043bc8d4403692965c38150b81303132a9 /modeline.el
parent99a236afe70c746c75c22bc3883f57f0dc5f2ab9 (diff)
Use the package "keycast"
Now I can conveniently display my key-bindings in the mode line.
Diffstat (limited to 'modeline.el')
-rw-r--r--modeline.el14
1 files changed, 14 insertions, 0 deletions
diff --git a/modeline.el b/modeline.el
index 683bf3d..b244463 100644
--- a/modeline.el
+++ b/modeline.el
@@ -91,6 +91,8 @@
(modeline-spc)
(modeline-format-buffer-size)
(modeline-spc)
+ (modeline-format-keycast)
+ (modeline-spc)
(modeline-format-minor-modes)))
;;;###autoload
@@ -366,6 +368,18 @@ mouse-2: Show help for minor mode
mouse-3: Toggle minor modes"
mode-line-minor-mode-keymap))
+(defun modeline-format-keycast ()
+ "Format the keycast information."
+ (declare (side-effect-free t))
+ (modeline-propertize
+ (format-mode-line mode-line-keycast)
+ nil
+ "Minor mode
+mouse-1: Display minor mode menu
+mouse-2: Show help for minor mode
+mouse-3: Toggle minor modes"
+ mode-line-minor-mode-keymap))
+
;;; NOTE: The minor mode menu does not work with my custom mode line.
;;;###autoload