Ignore buffers whose name begins with a space in save-some-buffers

* lisp/files.el (save-some-buffers): Consider these buffers
  "internal", and don't prompt the user to save them.
* doc/lispref/files.texi: Document.

diff --git a/doc/lispref/files.texi b/doc/lispref/files.texi
index 6be998f0b2ea2440a3961d026c46872b68120c1d..b1b858a6b4be13c967e60dcf692d072a3ef4337e 100644 (file)
--- a/doc/lispref/files.texi
+++ b/doc/lispref/files.texi
@@ -332,7 +332,9 @@ in the list @code{find-file-hook}.
 that is visiting that file---that is, the contents of the file are
 copied into the buffer and the copy is what you edit.  Changes to the
 buffer do not change the file until you @dfn{save} the buffer, which
-means copying the contents of the buffer into the file.
+means copying the contents of the buffer into the file.  Buffers which
+are not visiting a file can still be ``saved'', in a sense, using
+functions in the buffer-local @code{write-contents-functions} hook.
 
 @deffn Command save-buffer &optional backup-option
 This function saves the contents of the current buffer in its visited
@@ -365,8 +367,9 @@ With an argument of 0, unconditionally do @emph{not} make any backup file.
 @anchor{Definition of save-some-buffers}
 This command saves some modified file-visiting buffers.  Normally it
 asks the user about each buffer.  But if @var{save-silently-p} is
-non-@code{nil}, it saves all the file-visiting buffers without querying
-the user.
+non-@code{nil}, it saves all the file-visiting buffers without
+querying the user.  Additionally, buffers whose name begins with a
+space (``internal'' buffers) will not be offered for save.
 
 @vindex save-some-buffers-default-predicate
 The optional @var{pred} argument provides a predicate that controls

diff --git a/lisp/files.el b/lisp/files.el
index 133fed90c34be28c056bc7ef4d956e4185f5315d..ff0ab7063388b786cfdd89bf023580314fd3d02a 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -5188,6 +5188,7 @@ change the additional actions you can take on files."
               (and (buffer-live-p buffer)
                    (buffer-modified-p buffer)
                     (not (buffer-base-buffer buffer))
+                    (not (eq (aref (buffer-name buffer) 0) ?\s))
                     (or
                      (buffer-file-name buffer)
                      (and pred