diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2015-08-24 13:40:05 +0200 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2015-08-24 13:40:05 +0200 |
commit | 1c6bdf18c0f2116edef7f7195ca5ed7a55a05e73 (patch) | |
tree | 9fc80dbf79526d2f77646586dfb26854fd8a8b6e /lisp | |
parent | 13b257b083ea43fae8b178d1d43e901c12be2c7e (diff) | |
download | emacs-1c6bdf18c0f2116edef7f7195ca5ed7a55a05e73.tar.gz |
Revert fbb5531fa11d13854b274d28ccd329c9b6652cfc for tramp.el.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/net/tramp.el | 10 |
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) |