diff options
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/net/tramp.el | 3 |
2 files changed, 7 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c53fb3cf44f..581a0569113 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2005-11-02 Lars Hansen <larsh@soem.dk> | ||
| 2 | * net/tramp.el (tramp-action-out-of-band): Handle scp message | ||
| 3 | "Permission denied". | ||
| 4 | |||
| 1 | 2005-11-01 Richard M. Stallman <rms@gnu.org> | 5 | 2005-11-01 Richard M. Stallman <rms@gnu.org> |
| 2 | 6 | ||
| 3 | * textmodes/flyspell.el (flyspell-external-point-words): | 7 | * textmodes/flyspell.el (flyspell-external-point-words): |
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index 5dc1356c6d2..8555c9a83c5 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el | |||
| @@ -5361,6 +5361,9 @@ The terminal type can be configured with `tramp-terminal-type'." | |||
| 5361 | (tramp-message 10 "'set mode' error ignored.") | 5361 | (tramp-message 10 "'set mode' error ignored.") |
| 5362 | (tramp-message 9 "Process has finished.") | 5362 | (tramp-message 9 "Process has finished.") |
| 5363 | (throw 'tramp-action 'ok)) | 5363 | (throw 'tramp-action 'ok)) |
| 5364 | (goto-char (point-min)) | ||
| 5365 | (when (re-search-forward "^.cp.?: \\(.+: Permission denied.?\\)$" nil t) | ||
| 5366 | (error "Remote host: %s" (match-string 1))) | ||
| 5364 | (tramp-message 9 "Process has died.") | 5367 | (tramp-message 9 "Process has died.") |
| 5365 | (throw 'tramp-action 'process-died))) | 5368 | (throw 'tramp-action 'process-died))) |
| 5366 | (t nil))) | 5369 | (t nil))) |