diff options
Diffstat (limited to 'lisp/eshell')
| -rw-r--r-- | lisp/eshell/esh-ext.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/eshell/esh-ext.el b/lisp/eshell/esh-ext.el index f025c66df32..a411d3df06e 100644 --- a/lisp/eshell/esh-ext.el +++ b/lisp/eshell/esh-ext.el | |||
| @@ -188,6 +188,7 @@ all the output from the remote command, and sends it all at once, | |||
| 188 | causing the user to wonder if anything's really going on..." | 188 | causing the user to wonder if anything's really going on..." |
| 189 | (let ((outbuf (generate-new-buffer " *eshell remote output*")) | 189 | (let ((outbuf (generate-new-buffer " *eshell remote output*")) |
| 190 | (errbuf (generate-new-buffer " *eshell remote error*")) | 190 | (errbuf (generate-new-buffer " *eshell remote error*")) |
| 191 | (command (or (file-remote-p command 'localname) command)) | ||
| 191 | (exitcode 1)) | 192 | (exitcode 1)) |
| 192 | (unwind-protect | 193 | (unwind-protect |
| 193 | (progn | 194 | (progn |
| @@ -205,8 +206,8 @@ causing the user to wonder if anything's really going on..." | |||
| 205 | (defun eshell-external-command (command args) | 206 | (defun eshell-external-command (command args) |
| 206 | "Insert output from an external COMMAND, using ARGS." | 207 | "Insert output from an external COMMAND, using ARGS." |
| 207 | (setq args (eshell-stringify-list (eshell-flatten-list args))) | 208 | (setq args (eshell-stringify-list (eshell-flatten-list args))) |
| 208 | (if (file-remote-p default-directory) | 209 | ; (if (file-remote-p default-directory) |
| 209 | (eshell-remote-command command args)) | 210 | ; (eshell-remote-command command args)) |
| 210 | (let ((interp (eshell-find-interpreter command))) | 211 | (let ((interp (eshell-find-interpreter command))) |
| 211 | (assert interp) | 212 | (assert interp) |
| 212 | (if (functionp (car interp)) | 213 | (if (functionp (car interp)) |