441 |
"Turn on View mode." |
"Turn on View mode." |
442 |
;; Always leave view mode before changing major mode. |
;; Always leave view mode before changing major mode. |
443 |
;; This is to guarantee that the buffer-read-only variable is restored. |
;; This is to guarantee that the buffer-read-only variable is restored. |
|
(make-local-hook 'change-major-mode-hook) |
|
444 |
(add-hook 'change-major-mode-hook 'view-mode-disable nil t) |
(add-hook 'change-major-mode-hook 'view-mode-disable nil t) |
445 |
(setq view-mode t |
(setq view-mode t |
446 |
view-page-size (view-page-size-default view-page-size) |
view-page-size (view-page-size-default view-page-size) |