# HG changeset patch # User Eli Zaretskii # Date 1234002225 0 # Node ID 3d797aaa649480358e5b16c003eb98f93ac4d093 # Parent 0750b250db3dc941c17bebe563763b7abada839c (save-buffer): Display "Saving file FOO..." message regardless of buffer's size. (Bug#2137) diff -r 0750b250db3d -r 3d797aaa6494 lisp/files.el --- a/lisp/files.el Sat Feb 07 05:51:27 2009 +0000 +++ b/lisp/files.el Sat Feb 07 10:23:45 2009 +0000 @@ -4024,11 +4024,14 @@ See the subroutine `basic-save-buffer' for more information." (interactive "p") (let ((modp (buffer-modified-p)) - (large (> (buffer-size) 50000)) (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 (buffer-file-name)) + ;; 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 + ;; Rmail files. + (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))))