Mercurial > emacs
changeset 33558:786f1533a10f
(basic-save-buffer): Don't add a newline if
find-file-literally is non-nil.
(find-file-literally): Extend doc string.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Thu, 16 Nov 2000 17:04:27 +0000 |
| parents | 086e910eefc9 |
| children | c6a08bfab7fd |
| files | lisp/files.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Thu Nov 16 16:45:52 2000 +0000 +++ b/lisp/files.el Thu Nov 16 17:04:27 2000 +0000 @@ -1214,7 +1214,8 @@ and multibyte characters are disabled in the resulting buffer. The major mode used is Fundamental mode regardless of the file name, and local variable specifications in the file are ignored. -Automatic uncompression is also disabled. +Automatic uncompression and adding a newline at the end of the +file due to `require-final-newline' is also disabled. You cannot absolutely rely on this function to result in visiting the file literally. If Emacs already has a buffer @@ -2591,6 +2592,7 @@ (widen) (save-excursion (and (> (point-max) 1) + (not find-file-literally) (/= (char-after (1- (point-max))) ?\n) (not (and (eq selective-display t) (= (char-after (1- (point-max))) ?\r)))