# HG changeset patch # User Richard M. Stallman # Date 1128274654 0 # Node ID 8c8e6f2eea3cebc7c92d2c372ac8fa29121e70aa # Parent 5121212db6221b236702de9a13d2c73f10a80d57 Pacify byte compiler warnings in pacification code. (tramp-handle-file-local-copy): Use insert-buffer-substring. diff -r 5121212db622 -r 8c8e6f2eea3c lisp/net/tramp.el --- a/lisp/net/tramp.el Sun Oct 02 15:54:03 2005 +0000 +++ b/lisp/net/tramp.el Sun Oct 02 17:37:34 2005 +0000 @@ -136,7 +136,7 @@ ;; 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 @@ (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..."