Commit 87aed91b authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

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

after clearing the ones listed within it.
parent 51603bd0
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment