Mercurial > emacs
changeset 8462:c281b470d633
(save-buffer): Unconditionally make a backup with 2 or
3 C-u's even if make-backup-files is nil.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 06 Aug 1994 03:19:35 +0000 |
parents | c88361c3b940 |
children | e0f2f3fc75fa |
files | lisp/files.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Sat Aug 06 02:58:22 1994 +0000 +++ b/lisp/files.el Sat Aug 06 03:19:35 1994 +0000 @@ -1540,7 +1540,8 @@ (interactive "p") (let ((modp (buffer-modified-p)) (large (> (buffer-size) 50000)) - (make-backup-files (and make-backup-files (not (eq args 0))))) + (make-backup-files (or (and make-backup-files (not (eq args 0))) + (memq args '(16 64))))) (and modp (memq args '(16 64)) (setq buffer-backed-up nil)) (if (and modp large) (message "Saving file %s..." (buffer-file-name))) (basic-save-buffer)