[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r116372: * files.el (save-buffer): Use ARG as the pa
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] trunk r116372: * files.el (save-buffer): Use ARG as the parameter name for consistency |
Date: |
Sun, 09 Feb 2014 05:31:57 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 116372
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/10346
committer: Lars Ingebrigtsen <address@hidden>
branch nick: trunk
timestamp: Sat 2014-02-08 21:30:41 -0800
message:
* files.el (save-buffer): Use ARG as the parameter name for consistency
modified:
lisp/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-1432
lisp/files.el files.el-20091113204419-o5vbwnq5f7feedwu-265
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2014-02-09 05:05:06 +0000
+++ b/lisp/ChangeLog 2014-02-09 05:30:41 +0000
@@ -1,5 +1,8 @@
2014-02-09 Lars Ingebrigtsen <address@hidden>
+ * files.el (save-buffer): Use ARG as the parameter name for
+ consistency (bug#10346).
+
* cus-edit.el (customize-apropos): Fix error string.
(custom-buffer-create): Doc fix (bug#11122).
(custom-sort-items): Doc fix (bug#11121).
=== modified file 'lisp/files.el'
--- a/lisp/files.el 2014-02-09 03:02:45 +0000
+++ b/lisp/files.el 2014-02-09 05:30:41 +0000
@@ -4539,7 +4539,7 @@
;; We matched FILENAME's directory equivalent.
ancestor))))))
-(defun save-buffer (&optional args)
+(defun save-buffer (&optional arg)
"Save current buffer in visited file if modified.
Variations are described below.
@@ -4577,9 +4577,9 @@
See the subroutine `basic-save-buffer' for more information."
(interactive "p")
(let ((modp (buffer-modified-p))
- (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))
+ (make-backup-files (or (and make-backup-files (not (eq arg 0)))
+ (memq arg '(16 64)))))
+ (and modp (memq arg '(16 64)) (setq buffer-backed-up nil))
;; We used to display the message below only for files > 50KB, but
;; then Rmail-mbox never displays it due to buffer swapping. If
;; the test is ever re-introduced, be sure to handle saving of
@@ -4587,7 +4587,7 @@
(if (and modp (buffer-file-name))
(message "Saving file %s..." (buffer-file-name)))
(basic-save-buffer)
- (and modp (memq args '(4 64)) (setq buffer-backed-up nil))))
+ (and modp (memq arg '(4 64)) (setq buffer-backed-up nil))))
(defun delete-auto-save-file-if-necessary (&optional force)
"Delete auto-save file for current buffer if `delete-auto-save-files' is t.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r116372: * files.el (save-buffer): Use ARG as the parameter name for consistency,
Lars Ingebrigtsen <=