diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2013-01-03 21:53:48 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2013-01-03 21:53:48 -0500 |
| commit | 4a74c818809349ea30ddb5b2e1498c9f8a08d37e (patch) | |
| tree | 1ca2e5a8f29935bf5fa647c96954719ba6ec79d2 /lisp/files.el | |
| parent | 96dd18b1101638ddf0d38dfc3266888b225db26b (diff) | |
| download | emacs-4a74c818809349ea30ddb5b2e1498c9f8a08d37e.tar.gz | |
* lisp/view.el (view--enable, view--disable): Rename from view-mode-enable
and view-mode-disable and assume it's called from view-mode.
(view-mode-enable, view-mode-disable): Redefine as obsolete
compatibility layer above view-mode.
(view-mode-enter): Call `view-mode'.
* lisp/files.el (after-find-file): Call `view-mode'.
Diffstat (limited to 'lisp/files.el')
| -rw-r--r-- | lisp/files.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/files.el b/lisp/files.el index 6a2945cbc79..ca5a415fb8e 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -209,7 +209,6 @@ have fast storage with limited space, such as a RAM disk." (declare-function dired-unmark "dired" (arg)) (declare-function dired-do-flagged-delete "dired" (&optional nomessage)) (declare-function dos-8+3-filename "dos-fns" (filename)) -(declare-function view-mode-disable "view" ()) (declare-function dosified-file-name "dos-fns" (file-name)) (defvar file-name-invalid-regexp @@ -2125,7 +2124,7 @@ unless NOMODES is non-nil." (setq buffer-read-only t)) (unless nomodes (when (and view-read-only view-mode) - (view-mode-disable)) + (view-mode -1)) (normal-mode t) ;; If requested, add a newline at the end of the file. (and (memq require-final-newline '(visit visit-save)) |