Mercurial > emacs
comparison lisp/eshell/em-cmpl.el @ 106219:16b061d2742d
Improve handling of processes on remote hosts.
* eshell/esh-util.el (eshell-path-env): New defvar.
(eshell-parse-colon-path): New defun.
(eshell-file-attributes): Use `eshell-parse-colon-path'.
* eshell/esh-ext.el (eshell-search-path): Use
`eshell-parse-colon-path'.
(eshell-remote-command): Remove argument HANDLER.
(eshell-external-command): Check for FTP remote connection.
* eshell/esh-proc.el (eshell-gather-process-output): Use
`file-truename', in order to start also symlinked files. Apply
`start-file-process' instead of `start-process'. Shorten `command'
to the local file name part.
* eshell/em-cmpl.el (eshell-complete-commands-list): Use
`eshell-parse-colon-path'.
* eshell/em-unix.el (eshell/du): Check for FTP remote connection.
* net/tramp.el (tramp-eshell-directory-change): New defun. Add it
to `eshell-directory-change-hook'.
author | Michael Albinus <michael.albinus@gmx.de> |
---|---|
date | Tue, 24 Nov 2009 10:25:54 +0000 |
parents | a9dc0e7c3f2b |
children | 1d1d5d9bd884 |
comparison
equal
deleted
inserted
replaced
106218:8ccde493b34d | 106219:16b061d2742d |
---|---|
400 (if (and (> (length filename) 0) | 400 (if (and (> (length filename) 0) |
401 (eq (aref filename 0) eshell-explicit-command-char)) | 401 (eq (aref filename 0) eshell-explicit-command-char)) |
402 (setq filename (substring filename 1) | 402 (setq filename (substring filename 1) |
403 pcomplete-stub filename | 403 pcomplete-stub filename |
404 glob-name t)) | 404 glob-name t)) |
405 (let* ((paths (split-string (getenv "PATH") path-separator)) | 405 (let* ((paths (eshell-parse-colon-path eshell-path-env)) |
406 (cwd (file-name-as-directory | 406 (cwd (file-name-as-directory |
407 (expand-file-name default-directory))) | 407 (expand-file-name default-directory))) |
408 (path "") (comps-in-path ()) | 408 (path "") (comps-in-path ()) |
409 (file "") (filepath "") (completions ())) | 409 (file "") (filepath "") (completions ())) |
410 ;; Go thru each path in the search path, finding completions. | 410 ;; Go thru each path in the search path, finding completions. |