aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/eshell
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/eshell')
-rw-r--r--lisp/eshell/esh-ext.el5
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,
188causing the user to wonder if anything's really going on..." 188causing 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))