diff options
| author | Michael Albinus | 2015-08-26 10:33:11 +0200 |
|---|---|---|
| committer | Michael Albinus | 2015-08-26 10:33:11 +0200 |
| commit | 4a18d16e511ba0ef203d8addc8836618956667b0 (patch) | |
| tree | 96a7ef16a36601dde513edb711dd2accaa2b141b | |
| parent | 0cdcc50d161035e74de55b0ff82c90730ff22136 (diff) | |
| download | emacs-4a18d16e511ba0ef203d8addc8836618956667b0.tar.gz emacs-4a18d16e511ba0ef203d8addc8836618956667b0.zip | |
; * tramp-compat.el: Remove superfluous comment; formatting
| -rw-r--r-- | lisp/net/tramp-compat.el | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/lisp/net/tramp-compat.el b/lisp/net/tramp-compat.el index 817c71334db..9848325e45a 100644 --- a/lisp/net/tramp-compat.el +++ b/lisp/net/tramp-compat.el | |||
| @@ -533,10 +533,9 @@ EOL-TYPE can be one of `dos', `unix', or `mac'." | |||
| 533 | (cond ((eq eol-type 'dos) 'crlf) | 533 | (cond ((eq eol-type 'dos) 'crlf) |
| 534 | ((eq eol-type 'unix) 'lf) | 534 | ((eq eol-type 'unix) 'lf) |
| 535 | ((eq eol-type 'mac) 'cr) | 535 | ((eq eol-type 'mac) 'cr) |
| 536 | (t | 536 | (t (error |
| 537 | (error | 537 | "Unknown EOL-TYPE `%s', must be `dos', `unix', or `mac'" |
| 538 | "Unknown EOL-TYPE `%s', must be `dos', `unix', or `mac'" | 538 | eol-type))))) |
| 539 | eol-type))))) | ||
| 540 | (t (error "Can't change EOL conversion -- is MULE missing?")))) | 539 | (t (error "Can't change EOL conversion -- is MULE missing?")))) |
| 541 | 540 | ||
| 542 | ;; `replace-regexp-in-string' does not exist in XEmacs. | 541 | ;; `replace-regexp-in-string' does not exist in XEmacs. |
| @@ -596,8 +595,6 @@ and replace a sub-expression, e.g. | |||
| 596 | (defalias 'default-toplevel-value 'symbol-value)) | 595 | (defalias 'default-toplevel-value 'symbol-value)) |
| 597 | 596 | ||
| 598 | ;; `format-message' is new in Emacs 25, and does not exist in XEmacs. | 597 | ;; `format-message' is new in Emacs 25, and does not exist in XEmacs. |
| 599 | ;; The substitute implementation always uses grave quoting style, for | ||
| 600 | ;; compatibility with older Emacs. | ||
| 601 | (unless (fboundp 'format-message) | 598 | (unless (fboundp 'format-message) |
| 602 | (defalias 'format-message 'format)) | 599 | (defalias 'format-message 'format)) |
| 603 | 600 | ||