1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00

(tar-mode-write-file): Clear buffer's own modified flag

after clearing the ones listed within it.
This commit is contained in:
Richard M. Stallman 1996-08-28 14:27:08 +00:00
parent 51603bd058
commit 87aed91b30

View file

@ -1196,7 +1196,8 @@ Leaves the region wide."
;; I suppose this is run in a context where changing the buffer is bad.
;; (tar-pad-to-blocksize)
(write-region tar-header-offset (point-max) buffer-file-name nil t)
(tar-clear-modification-flags))
(tar-clear-modification-flags)
(set-buffer-modified-p nil))
(narrow-to-region 1 tar-header-offset))
;; return T because we've written the file.
t)