From 8d68c659a6e79745bc1350252751803cecb0e150 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Fri, 31 Dec 2010 20:57:05 +0100 Subject: [PATCH] * net/tramp-sh.el (tramp-methods): Add recursive options to "scpc" and "scpx". --- lisp/ChangeLog | 5 +++++ lisp/net/tramp-sh.el | 6 ++++-- 2 files changed, 9 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6a7bcf9745b..8e693845a4f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-12-31 Michael Albinus + + * net/tramp-sh.el (tramp-methods): Add recursive options to "scpc" + and "scpx". + 2010-12-30 Tassilo Horn * doc-view.el (doc-view-set-doc-type): New function refactored diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el index 86948bbc69b..9950709bd7a 100644 --- a/lisp/net/tramp-sh.el +++ b/lisp/net/tramp-sh.el @@ -161,10 +161,11 @@ detected as prompt when being sent on echoing hosts, therefore.") (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh") (tramp-copy-program "scp") - (tramp-copy-args (("-P" "%p") ("%k" "-p") ("-q") + (tramp-copy-args (("-P" "%p") ("%k" "-p") ("-q") ("-r") ("-o" "ControlPath=%t.%%r@%%h:%%p") ("-o" "ControlMaster=auto"))) (tramp-copy-keep-date t) + (tramp-copy-recursive t) (tramp-gw-args (("-o" "GlobalKnownHostsFile=/dev/null") ("-o" "UserKnownHostsFile=/dev/null") ("-o" "StrictHostKeyChecking=no"))) @@ -179,8 +180,9 @@ detected as prompt when being sent on echoing hosts, therefore.") (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh") (tramp-copy-program "scp") - (tramp-copy-args (("%k" "-p"))) + (tramp-copy-args (("-P" "%p") ("%k" "-p") ("-q") ("-r"))) (tramp-copy-keep-date t) + (tramp-copy-recursive t) (tramp-gw-args (("-o" "GlobalKnownHostsFile=/dev/null") ("-o" "UserKnownHostsFile=/dev/null") ("-o" "StrictHostKeyChecking=no"))) -- 2.39.5