aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2005-10-02 17:37:34 +0000
committerRichard M. Stallman2005-10-02 17:37:34 +0000
commitf9f51bbf9eccb0bebdd7eebe39e9e7dd9e90a0e8 (patch)
tree16c6ff6a3f90eb866a0bba2c7616a1fa225739bd
parentedb18c43df867f09ffff9841482900fd9267abd4 (diff)
downloademacs-f9f51bbf9eccb0bebdd7eebe39e9e7dd9e90a0e8.tar.gz
emacs-f9f51bbf9eccb0bebdd7eebe39e9e7dd9e90a0e8.zip
Pacify byte compiler warnings in pacification code.
(tramp-handle-file-local-copy): Use insert-buffer-substring.
-rw-r--r--lisp/net/tramp.el4
1 files changed, 2 insertions, 2 deletions
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.")
136;; Avoid byte-compiler warnings if the byte-compiler supports this. 136;; Avoid byte-compiler warnings if the byte-compiler supports this.
137;; Currently, XEmacs supports this. 137;; Currently, XEmacs supports this.
138(eval-when-compile 138(eval-when-compile
139 (when (fboundp 'byte-compiler-options) 139 (when (featurep 'xemacs)
140 (let (unused-vars) ; Pacify Emacs byte-compiler 140 (let (unused-vars) ; Pacify Emacs byte-compiler
141 (defalias 'warnings 'identity) ; Pacify Emacs byte-compiler 141 (defalias 'warnings 'identity) ; Pacify Emacs byte-compiler
142 (byte-compiler-options (warnings (- unused-vars)))))) 142 (byte-compiler-options (warnings (- unused-vars))))))
@@ -3681,7 +3681,7 @@ This will break if COMMAND prints a newline, followed by the value of
3681 (let ((tmpbuf (get-buffer-create " *tramp tmp*"))) 3681 (let ((tmpbuf (get-buffer-create " *tramp tmp*")))
3682 (set-buffer tmpbuf) 3682 (set-buffer tmpbuf)
3683 (erase-buffer) 3683 (erase-buffer)
3684 (insert-buffer tramp-buf) 3684 (insert-buffer-substring tramp-buf)
3685 (tramp-message-for-buffer 3685 (tramp-message-for-buffer
3686 multi-method method user host 3686 multi-method method user host
3687 6 "Decoding remote file %s with function %s..." 3687 6 "Decoding remote file %s with function %s..."