From 3984fbbce9c93a118eebd73366e8338867c88e4d Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sun, 1 May 2016 19:42:35 +0200 Subject: [PATCH] Add `size-indication-mode' to the menu on `mouse-1' "Top" * lisp/bindings.el (mode-line-column-line-number-mode-map): Add `size-indication-mode' to the menu (bug#5727). --- lisp/bindings.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lisp/bindings.el b/lisp/bindings.el index b64cd71fe24..c13f4b156a1 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el @@ -338,6 +338,10 @@ mouse-3: Toggle minor modes" (defvar mode-line-column-line-number-mode-map (let ((map (make-sparse-keymap)) (menu-map (make-sparse-keymap "Toggle Line and Column Number Display"))) + (bindings--define-key menu-map [size-indication-mode] + '(menu-item "Display Size Indication" size-indication-mode + :help "Toggle displaying a size indication in the mode-line" + :button (:toggle . size-indication-mode))) (bindings--define-key menu-map [line-number-mode] '(menu-item "Display Line Numbers" line-number-mode :help "Toggle displaying line numbers in the mode-line" -- 2.39.2