aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2008-12-09 23:43:11 +0000
committerChong Yidong2008-12-09 23:43:11 +0000
commitbe9acc262964098b774110b7fb2f0228ffd74863 (patch)
tree69caa71d8b418d3205a3e7b83f2e6a46015e3a63
parent39af3de2c134e5b5d9068f6fad20c4cdf57d38f6 (diff)
downloademacs-be9acc262964098b774110b7fb2f0228ffd74863.tar.gz
emacs-be9acc262964098b774110b7fb2f0228ffd74863.zip
(save-some-buffers): At each map-y-or-n-p iteration,
check whether the buffer is still alive.
-rw-r--r--lisp/files.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el
index ba281a908a1..0e303805d0c 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -4351,7 +4351,10 @@ change the additional actions you can take on files."
4351 (setq files-done 4351 (setq files-done
4352 (map-y-or-n-p 4352 (map-y-or-n-p
4353 (lambda (buffer) 4353 (lambda (buffer)
4354 (and (buffer-modified-p buffer) 4354 ;; Note that killing some buffers may kill others via
4355 ;; hooks (e.g. Rmail and its viewing buffer).
4356 (and (buffer-live-p buffer)
4357 (buffer-modified-p buffer)
4355 (not (buffer-base-buffer buffer)) 4358 (not (buffer-base-buffer buffer))
4356 (or 4359 (or
4357 (buffer-file-name buffer) 4360 (buffer-file-name buffer)