summaryrefslogtreecommitdiff
path: root/lisp/tar-mode.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2005-07-18 10:46:17 +0000
committerJuanma Barranquero <lekktu@gmail.com>2005-07-18 10:46:17 +0000
commitf38cec78b65a7933dce878e4e748b25ba4d0c2d8 (patch)
treed1d7e1f4b98c77a353fcfe130d06d0558d0d6d66 /lisp/tar-mode.el
parent88cb5d3ce6d4c8c941a0c5201c1575d2e54bad42 (diff)
downloademacs-f38cec78b65a7933dce878e4e748b25ba4d0c2d8.tar.gz
(tar-subfile-save-buffer): Use `insert-buffer-substring', not `insert-buffer'.
Diffstat (limited to 'lisp/tar-mode.el')
-rw-r--r--lisp/tar-mode.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el
index 041f0fddc1a..7da14387738 100644
--- a/lisp/tar-mode.el
+++ b/lisp/tar-mode.el
@@ -1120,7 +1120,7 @@ to make your changes permanent."
(descriptor tar-superior-descriptor)
subfile-size)
;; We must make the current buffer unibyte temporarily to avoid
- ;; multibyte->unibyte conversion in `insert-buffer'.
+ ;; multibyte->unibyte conversion in `insert-buffer-substring'.
(set-buffer-multibyte nil)
(setq subfile-size (buffer-size))
(set-buffer tar-superior-buffer)
@@ -1144,7 +1144,7 @@ to make your changes permanent."
(delete-region data-start data-end)
;; insert the new data...
(goto-char data-start)
- (insert-buffer subfile)
+ (insert-buffer-substring subfile)
(setq subfile-size
(encode-coding-region
data-start (+ data-start subfile-size) coding))