diff options
| author | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2011-07-19 17:01:49 +0200 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2011-07-19 17:01:49 +0200 |
| commit | 1bfd59e52c910539dea41e86204fd86b38024239 (patch) | |
| tree | 951ef65958d8e50e3dff7d722bcac2ff140a0201 /lisp | |
| parent | fd99fde61fbdd83fd6462a6dec62c0fe7af66c83 (diff) | |
| download | emacs-1bfd59e52c910539dea41e86204fd86b38024239.tar.gz | |
(view-buffer): Allow running in `special' modes if we're visiting a file.
Fixes: debbugs:8615
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/view.el | 7 |
2 files changed, 9 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 50e4cd49f4c..0699a93ac9b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2011-07-19 Lars Magne Ingebrigtsen <larsi@gnus.org> + + * view.el (view-buffer): Allow running in `special' modes if we're + visiting a file (bug#8615). + 2011-07-19 Martin Rudalics <rudalics@gmx.at> * window.el (display-buffer-alist-of-strings-p) diff --git a/lisp/view.el b/lisp/view.el index ee85b4e7823..21479a70a72 100644 --- a/lisp/view.el +++ b/lisp/view.el @@ -311,9 +311,10 @@ file: Users may suspend viewing in order to modify the buffer. Exiting View mode will then discard the user's edits. Setting EXIT-ACTION to `kill-buffer-if-not-modified' avoids this." (interactive "bView buffer: ") - (if (eq (with-current-buffer buffer - (get major-mode 'mode-class)) - 'special) + (if (with-current-buffer buffer + (and (eq (get major-mode 'mode-class) + 'special) + (null buffer-file-name))) (progn (switch-to-buffer buffer) (message "Not using View mode because the major mode is special")) |