mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-24 19:03:29 +00:00
Code Issues Releases Activity

(tar-subfile-save-buffer): Use insert-buffer-substring', not insert-buffer'.

Browse Source
This commit is contained in:
Juanma Barranquero 2005-07-18 10:46:17 +00:00
parent 88cb5d3ce6
commit f38cec78b6
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/tar-mode.el
View File

@ -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))