Mercurial > emacs

changeset 41817:ce19ab149767

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(save-abbrevs, save-some-buffers): Don't ask the user before saving abbrevs if `save-abbrevs' has the value `silently'.
author Eli Zaretskii <eliz@gnu.org>
date Tue, 04 Dec 2001 18:25:57 +0000
parents 51c83c94195a
children b825fce96ab6
files lisp/files.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/files.el	Tue Dec 04 18:21:44 2001 +0000
+++ b/lisp/files.el	Tue Dec 04 18:25:57 2001 +0000
@@ -312,8 +312,9 @@
   :version "21.1")
 
 (defcustom save-abbrevs t
-  "*Non-nil means save word abbrevs too when files are saved."
-  :type 'boolean
+  "*Non-nil means save word abbrevs too when files are saved.
+If `silently', don't ask the user before saving."
+  :type '(choice (const t) (const nil) (const silently))
   :group 'abbrev)
 
 (defcustom find-file-run-dired t
@@ -2804,6 +2805,7 @@
 	    (and save-abbrevs abbrevs-changed
 		 (progn
 		   (if (or arg
+			   (eq save-abbrevs 'silently)
 			   (y-or-n-p (format "Save abbrevs in %s? "
 					     abbrev-file-name)))
 		       (write-abbrev-file nil))