From: Richard M. Stallman Date: Sun, 2 Oct 2005 17:37:34 +0000 (+0000) Subject: Pacify byte compiler warnings in pacification code. X-Git-Tag: emacs-pretest-22.0.90~6858 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f9f51bbf9eccb0bebdd7eebe39e9e7dd9e90a0e8;p=emacs.git 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 9c832dd14f9..17b91d92818 100644 --- 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..."