diff options
| author | Lars Ingebrigtsen | 2016-05-01 19:42:35 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2016-05-01 19:42:35 +0200 |
| commit | 3984fbbce9c93a118eebd73366e8338867c88e4d (patch) | |
| tree | 22f523e454857d07caa00834d18370f406c0d418 | |
| parent | ce98b0b1ab20a1b5a0fe85c8b118b34d3b3cf274 (diff) | |
| download | emacs-3984fbbce9c93a118eebd73366e8338867c88e4d.tar.gz emacs-3984fbbce9c93a118eebd73366e8338867c88e4d.zip | |
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).
| -rw-r--r-- | lisp/bindings.el | 4 |
1 files changed, 4 insertions, 0 deletions
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" | |||
| 338 | (defvar mode-line-column-line-number-mode-map | 338 | (defvar mode-line-column-line-number-mode-map |
| 339 | (let ((map (make-sparse-keymap)) | 339 | (let ((map (make-sparse-keymap)) |
| 340 | (menu-map (make-sparse-keymap "Toggle Line and Column Number Display"))) | 340 | (menu-map (make-sparse-keymap "Toggle Line and Column Number Display"))) |
| 341 | (bindings--define-key menu-map [size-indication-mode] | ||
| 342 | '(menu-item "Display Size Indication" size-indication-mode | ||
| 343 | :help "Toggle displaying a size indication in the mode-line" | ||
| 344 | :button (:toggle . size-indication-mode))) | ||
| 341 | (bindings--define-key menu-map [line-number-mode] | 345 | (bindings--define-key menu-map [line-number-mode] |
| 342 | '(menu-item "Display Line Numbers" line-number-mode | 346 | '(menu-item "Display Line Numbers" line-number-mode |
| 343 | :help "Toggle displaying line numbers in the mode-line" | 347 | :help "Toggle displaying line numbers in the mode-line" |