summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorMichael Albinus <michael.albinus@gmx.de>2015-08-24 13:40:05 +0200
committerMichael Albinus <michael.albinus@gmx.de>2015-08-24 13:40:05 +0200
commit1c6bdf18c0f2116edef7f7195ca5ed7a55a05e73 (patch)
tree9fc80dbf79526d2f77646586dfb26854fd8a8b6e /lisp
parent13b257b083ea43fae8b178d1d43e901c12be2c7e (diff)
downloademacs-1c6bdf18c0f2116edef7f7195ca5ed7a55a05e73.tar.gz
Revert fbb5531fa11d13854b274d28ccd329c9b6652cfc for tramp.el.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/net/tramp.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 69d7e1fe613..193d70b230a 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -1504,7 +1504,7 @@ ARGUMENTS to actually emit the message (if applicable)."
; (1+ (count-lines (point-min) (cdr ffn)))))))
(insert (format "%s " fn)))
;; The message.
- (insert (apply #'format-message fmt-string arguments))))
+ (insert (apply 'format fmt-string arguments))))
(defvar tramp-message-show-message t
"Show Tramp message in the minibuffer.
@@ -1581,8 +1581,8 @@ signal identifier to be raised, remaining arguments passed to
(error-message-string
(list signal
(get signal 'error-message)
- (apply #'format-message fmt-string arguments)))))
- (signal signal (list (apply #'format-message fmt-string arguments)))))
+ (apply 'format fmt-string arguments)))))
+ (signal signal (list (apply 'format fmt-string arguments)))))
(defsubst tramp-error-with-buffer
(buf vec-or-proc signal fmt-string &rest arguments)
@@ -3599,8 +3599,8 @@ connection buffer."
"Tramp failed to connect. If this happens repeatedly, try\n"
" `\\[tramp-cleanup-this-connection]'")))
((eq exit 'timeout)
- (format-message
- "Timeout reached, see buffer ā€˜%s’ for details"
+ (format
+ "Timeout reached, see buffer `%s' for details"
(tramp-get-connection-buffer vec)))
(t "Login failed")))))
(when (numberp pos)