(tramp-action-out-of-band): Handle scp message "Permission denied".

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 @@
+2005-11-02  Lars Hansen  <larsh@soem.dk>
+        * net/tramp.el (tramp-action-out-of-band): Handle scp message
+        "Permission denied".
+
 2005-11-01  Richard M. Stallman  <rms@gnu.org>
 
         * 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'."
                (tramp-message 10 "'set mode' error ignored.")
                (tramp-message 9 "Process has finished.")
                (throw 'tramp-action 'ok))
+           (goto-char (point-min))
+           (when (re-search-forward "^.cp.?: \\(.+: Permission denied.?\\)$" nil t)
+             (error "Remote host: %s" (match-string 1)))
            (tramp-message 9 "Process has died.")
            (throw 'tramp-action 'process-died)))
         (t nil)))