Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

(save-abbrevs, save-some-buffers): Don't ask the user

Browse source 
before saving abbrevs if `save-abbrevs' has the value `silently'.
This commit is contained in:
Eli Zaretskii 2001-12-04 18:27:06 +00:00
parent 273a39301b
commit 02c6a1ccf0
2 changed files with 9 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2001-12-04 Juanma Barranquero <lektu@terra.es>
* files.el (save-abbrevs, save-some-buffers): Don't ask the user
before saving abbrevs if `save-abbrevs' has the value `silently'.
2001-12-04 Andreas Schwab <schwab@suse.de>
* xt-mouse.el (turn-off-xterm-mouse-tracking): Doc fix.

6
lisp/files.el
View file

@ -312,8 +312,9 @@ editing a remote file."
: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 @@ to consider it or not when called with that buffer current."
(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))