508 |
(force-mode-line-update) |
(force-mode-line-update) |
509 |
(message "%s" |
(message "%s" |
510 |
(substitute-command-keys "\ |
(substitute-command-keys "\ |
511 |
Type \\[help-command] for help, \\[describe-mode] for commands, \\[View-quit] to quit.")))) |
View mode: type \\[help-command] for help, \\[describe-mode] for commands, \\[View-quit] to quit.")))) |
512 |
|
|
513 |
(defun view-mode-exit (&optional return-to-alist exit-action all-win) |
(defun view-mode-exit (&optional return-to-alist exit-action all-win) |
514 |
"Exit View mode in various ways, depending on optional arguments. |
"Exit View mode in various ways, depending on optional arguments. |