Commit e209b837 authored by Dave Love's avatar Dave Love
Browse files

(minor-mode-alist): Propertize the string.

parent 4b7c7a40
......@@ -159,7 +159,12 @@ This is local in each buffer, once it is used.")
(or (assq 'view-mode minor-mode-alist)
(setq minor-mode-alist
(cons '(view-mode " View") minor-mode-alist)))
(cons (list 'view-mode
(propertize " View"
'help-echo "mouse-2: exit View mode"
'keymap (make-mode-line-mouse2-map
;; Define keymap inside defvar to make it easier to load changes.
;; Some redundant "less"-like key bindings below have been commented out.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment