# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 915115203 0
# Node ID d1d08f461c9c341894a732fe287dfc167c4076cd
# Parent  3e4e87cddb8508a18e02210ae35e13d03bc4e4c7
(sgml-validate): Ask whether to save only
if buffer is modified; ask about all modified buffers.

diff -r 3e4e87cddb85 -r d1d08f461c9c lisp/textmodes/sgml-mode.el
--- a/lisp/textmodes/sgml-mode.el	Thu Dec 31 13:44:02 1998 +0000
+++ b/lisp/textmodes/sgml-mode.el	Thu Dec 31 14:40:03 1998 +0000
@@ -776,9 +776,7 @@
 				    (and name
 					 (file-name-nondirectory name))))))))
   (setq sgml-saved-validate-command command)
-  (if (or (not compilation-ask-about-save)
-	  (y-or-n-p (message "Save buffer %s? " (buffer-name))))
-      (save-buffer))
+  (save-some-buffers (not compilation-ask-about-save) nil)
   (compile-internal command "No more errors"))