summaryrefslogtreecommitdiff
path: root/lisp/view.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2008-01-25 04:41:09 +0000
committerGlenn Morris <rgm@gnu.org>2008-01-25 04:41:09 +0000
commitce173b302f23074f3e8a086ba1ccfa7ad01ec8af (patch)
treed48092d43e19ecf8c72cdc625f312ff922476832 /lisp/view.el
parentc8467c40b35566ca0515f3abe349642dcd26e017 (diff)
downloademacs-ce173b302f23074f3e8a086ba1ccfa7ad01ec8af.tar.gz
Sven Joachim <svenjoac at gmx.de>
(kill-buffer-if-not-modified): Don't pass t to buffer-modified-p.
Diffstat (limited to 'lisp/view.el')
-rw-r--r--lisp/view.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/view.el b/lisp/view.el
index c663b2a2431..410b8ecc6a6 100644
--- a/lisp/view.el
+++ b/lisp/view.el
@@ -249,7 +249,7 @@ This is local in each buffer, once it is used.")
;; types C-x C-q again to return to view mode.
(defun kill-buffer-if-not-modified (buf)
"Like `kill-buffer', but does nothing if the buffer is modified."
- (let ((buf (or (bufferp buf) (get-buffer buf))))
+ (let ((buf (get-buffer buf)))
(and buf (not (buffer-modified-p buf))
(kill-buffer buf))))