Pacify byte compiler warnings in pacification code.

(tramp-handle-file-local-copy): Use insert-buffer-substring.

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 9c832dd14f93ffd9631d2186c65f78c1a68ea8d1..17b91d92818134a13ee1533d7ec7e82aaf368121 100644 (file)
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -136,7 +136,7 @@ Nil means to use a separate filename syntax for Tramp.")
 ;; Avoid byte-compiler warnings if the byte-compiler supports this.
 ;; Currently, XEmacs supports this.
 (eval-when-compile
-  (when (fboundp 'byte-compiler-options)
+  (when (featurep 'xemacs)
     (let (unused-vars) ; Pacify Emacs byte-compiler
       (defalias 'warnings 'identity) ; Pacify Emacs byte-compiler
       (byte-compiler-options (warnings (- unused-vars))))))
@@ -3681,7 +3681,7 @@ This will break if COMMAND prints a newline, followed by the value of
                   (let ((tmpbuf (get-buffer-create " *tramp tmp*")))
                     (set-buffer tmpbuf)
                     (erase-buffer)
-                    (insert-buffer tramp-buf)
+                    (insert-buffer-substring tramp-buf)
                     (tramp-message-for-buffer
                      multi-method method user host
                      6 "Decoding remote file %s with function %s..."