diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2001-08-09 13:45:23 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2001-08-09 13:45:23 +0000 |
| commit | 15409553ec55a559edca4a68e0994687e1df2690 (patch) | |
| tree | 2cdb7c9f8ca941c352a8979e1389ecf1fdb52f26 /lisp/bindings.el | |
| parent | f0c1cc56a032bf5a6bbaa4850bc68608521b375f (diff) | |
| download | emacs-15409553ec55a559edca4a68e0994687e1df2690.tar.gz | |
(mode-line-format): Specify help-echo for line
number, column number and buffer-percent part of the mode-line.
Diffstat (limited to 'lisp/bindings.el')
| -rw-r--r-- | lisp/bindings.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el index 1073c0cc6c3..348c97a05a4 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el @@ -225,9 +225,9 @@ Normally nil in most modes, since there is no process to display.") 'local-map (make-mode-line-mouse2-map #'mode-line-widen)) (propertize ")%]--" 'help-echo help-echo) `(which-func-mode ("" which-func-format ,dashes)) - `(line-number-mode ("L%l" ,dashes)) - `(column-number-mode ("C%c" ,dashes)) - (purecopy '(-3 . "%p")) + `(line-number-mode (,(propertize "L%l" 'help-echo help-echo) ,dashes)) + `(column-number-mode (,(propertize "C%c" 'help-echo help-echo) ,dashes)) + `(-3 . ,(propertize "%p" 'help-echo help-echo)) (propertize "-%-" 'help-echo help-echo)))) (defvar minor-mode-alist nil "\ |