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).

diff --git a/lisp/bindings.el b/lisp/bindings.el
index b64cd71fe24a7d913f4aa0847f20984c3b118fdc..c13f4b156a17cc14190669fb96bc3d024a289c60 100644 (file)
--- 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"