diff options
| author | Michael Albinus | 2013-06-19 15:14:24 +0200 |
|---|---|---|
| committer | Michael Albinus | 2013-06-19 15:14:24 +0200 |
| commit | 15b263dcf84734d5f0187944a4bf437f997ded02 (patch) | |
| tree | e387246ad26500bfee616c821c1c6faa280ab379 | |
| parent | a7f7138d0a2a8970564c06fb70b007b4efb2f623 (diff) | |
| download | emacs-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/ChangeLog | 7 | ||||
| -rw-r--r-- | lisp/net/tramp-adb.el | 10 | ||||
| -rw-r--r-- | lisp/net/tramp-sh.el | 11 |
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 @@ | |||
| 1 | 2013-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 | |||
| 1 | 2013-06-19 Lars Magne Ingebrigtsen <larsi@gnus.org> | 8 | 2013-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 | ||
| 380 | or `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 |