aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMichael Albinus2013-06-19 15:14:24 +0200
committerMichael Albinus2013-06-19 15:14:24 +0200
commit15b263dcf84734d5f0187944a4bf437f997ded02 (patch)
treee387246ad26500bfee616c821c1c6faa280ab379
parenta7f7138d0a2a8970564c06fb70b007b4efb2f623 (diff)
downloademacs-15b263dcf84734d5f0187944a4bf437f997ded02.tar.gz
emacs-15b263dcf84734d5f0187944a4bf437f997ded02.zip
* net/tramp-adb.el (tramp-adb-get-toolbox): Remove function, it is
not needed. * net/tramp-sh.el (tramp-find-shell): Don't set "busybox" property.
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/net/tramp-adb.el10
-rw-r--r--lisp/net/tramp-sh.el11
3 files changed, 11 insertions, 17 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2c5b25b5eff..680796cee70 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
12013-06-19 Michael Albinus <michael.albinus@gmx.de>
2
3 * net/tramp-adb.el (tramp-adb-get-toolbox): Remove function, it is
4 not needed.
5
6 * net/tramp-sh.el (tramp-find-shell): Don't set "busybox" property.
7
12013-06-19 Lars Magne Ingebrigtsen <larsi@gnus.org> 82013-06-19 Lars Magne Ingebrigtsen <larsi@gnus.org>
2 9
3 * net/browse-url.el (browse-url-browser-function): 10 * net/browse-url.el (browse-url-browser-function):
diff --git a/lisp/net/tramp-adb.el b/lisp/net/tramp-adb.el
index 613b2067955..14fb8575fff 100644
--- a/lisp/net/tramp-adb.el
+++ b/lisp/net/tramp-adb.el
@@ -375,16 +375,6 @@ pass to the OPERATION."
375 "ls --color=never" 375 "ls --color=never"
376 "ls"))) 376 "ls")))
377 377
378(defun tramp-adb-get-toolbox (vec)
379 "Get shell toolbox implementation: `toolbox' for original distributions
380or `busybox' for CyanogenMod based distributions"
381 (with-tramp-connection-property vec "toolbox"
382 (tramp-message vec 5 "Checking shell toolbox implementation")
383 (cond
384 ((zerop (tramp-adb-command-exit-status vec "busybox")) 'busybox)
385 ((zerop (tramp-adb-command-exit-status vec "toolbox")) 'toolbox)
386 (t 'unknown))))
387
388(defun tramp-adb--gnu-switches-to-ash 378(defun tramp-adb--gnu-switches-to-ash
389 (switches) 379 (switches)
390 "Almquist shell can't handle multiple arguments. 380 "Almquist shell can't handle multiple arguments.
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index e45c2cf8511..387084a807b 100644
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -3626,13 +3626,7 @@ file exists and nonzero exit status otherwise."
3626 (unless (string-equal shell default-shell) 3626 (unless (string-equal shell default-shell)
3627 (tramp-message 3627 (tramp-message
3628 vec 5 "Starting remote shell `%s' for tilde expansion" shell) 3628 vec 5 "Starting remote shell `%s' for tilde expansion" shell)
3629 (tramp-open-shell vec shell)) 3629 (tramp-open-shell vec shell)))))
3630
3631 ;; Busyboxes tend to behave strange. We check for the existence.
3632 (with-tramp-connection-property vec "busybox"
3633 (tramp-send-command vec (format "%s --version" shell) t)
3634 (let ((case-fold-search t))
3635 (and (string-match "busybox" (buffer-string)) t))))))
3636 3630
3637;; Utility functions. 3631;; Utility functions.
3638 3632
@@ -4458,6 +4452,9 @@ function waits for output unless NOOUTPUT is set."
4458 ;; We mark the command string that it can be erased in the output buffer. 4452 ;; We mark the command string that it can be erased in the output buffer.
4459 (tramp-set-connection-property p "check-remote-echo" t) 4453 (tramp-set-connection-property p "check-remote-echo" t)
4460 (setq command (format "%s%s%s" tramp-echo-mark command tramp-echo-mark))) 4454 (setq command (format "%s%s%s" tramp-echo-mark command tramp-echo-mark)))
4455 ;; Some busyboxes tend to close the connection when we use the
4456 ;; following syntax for here-documents. This we cannot test; it
4457 ;; shall be set via `tramp-connection-properties'.
4461 (when (and (string-match "<<'EOF'" command) 4458 (when (and (string-match "<<'EOF'" command)
4462 (not (tramp-get-connection-property vec "busybox" nil))) 4459 (not (tramp-get-connection-property vec "busybox" nil)))
4463 ;; Unset $PS1 when using here documents, in order to avoid 4460 ;; Unset $PS1 when using here documents, in order to avoid