[Emacs-diffs] Changes to emacs/lisp/net/tramp.el

[Lars Hansen]

Index: emacs/lisp/net/tramp.el
diff -c emacs/lisp/net/tramp.el:1.83 emacs/lisp/net/tramp.el:1.84
*** emacs/lisp/net/tramp.el:1.83        Sun Oct 30 19:58:40 2005
--- emacs/lisp/net/tramp.el     Wed Nov  2 07:05:32 2005
***************
*** 5361,5366 ****
--- 5361,5369 ----
               (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)))