diff options
| author | Michael Albinus | 2008-01-26 14:54:55 +0000 |
|---|---|---|
| committer | Michael Albinus | 2008-01-26 14:54:55 +0000 |
| commit | 5d449a36ccff14cfa371f61cf57501e073e5d2f9 (patch) | |
| tree | b47156a65d1d024175d6e38a574f652a41f74ebd | |
| parent | 65b014077a58eb191c45f5e73c1be775a491f7c0 (diff) | |
| download | emacs-5d449a36ccff14cfa371f61cf57501e073e5d2f9.tar.gz emacs-5d449a36ccff14cfa371f61cf57501e073e5d2f9.zip | |
* net/tramp.el (tramp-dissect-file-name): Raise an error when
Tramp 2.0 syntax is used. Suggested by Trent W. Buck
<trentbuck@gmail.com>.
| -rw-r--r-- | lisp/net/tramp.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index 4aa092ad704..9fba537f006 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el | |||
| @@ -6663,6 +6663,10 @@ values." | |||
| 6663 | (user (match-string (nth 2 tramp-file-name-structure) name)) | 6663 | (user (match-string (nth 2 tramp-file-name-structure) name)) |
| 6664 | (host (match-string (nth 3 tramp-file-name-structure) name)) | 6664 | (host (match-string (nth 3 tramp-file-name-structure) name)) |
| 6665 | (localname (match-string (nth 4 tramp-file-name-structure) name))) | 6665 | (localname (match-string (nth 4 tramp-file-name-structure) name))) |
| 6666 | (when (member method '("multi" "multiu")) | ||
| 6667 | (error | ||
| 6668 | "`%s' method is no longer supported, see (info \"(tramp)Multi-hops\")" | ||
| 6669 | method)) | ||
| 6666 | (if nodefault | 6670 | (if nodefault |
| 6667 | (vector method user host localname) | 6671 | (vector method user host localname) |
| 6668 | (vector | 6672 | (vector |