From 5ee42746ce5715f9be7625173ce0adeca5db6dc1 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Fri, 9 Jun 2000 14:19:34 +0000 Subject: [PATCH] (tar-copy): Supply MUSTBENEW arg to write-region. --- lisp/ChangeLog | 2 ++ lisp/tar-mode.el | 2 +- 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index abf1255da5a..745384d85c5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2000-06-09 Dave Love + * tar-mode.el (tar-copy): Supply MUSTBENEW arg to write-region. + * executable.el: Byte compile dynamic. (executable-insert): Change custom type. (executable-find): Add autoload cookie. diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el index bbf4774fd72..8fade4c6768 100644 --- a/lisp/tar-mode.el +++ b/lisp/tar-mode.el @@ -834,7 +834,7 @@ the current tar-entry." (unwind-protect (let ((coding-system-for-write 'no-conversion)) (set-buffer-multibyte nil) - (write-region start end to-file)) + (write-region start end to-file nil nil nil t)) (set-buffer-multibyte multibyte))) (message "Copied tar entry %s to %s" name to-file))) -- 2.39.2