]> code.delx.au - gnu-emacs/commitdiff
* eshell/esh-ext.el: Explain, why we suppress the check in
authorMichael Albinus <michael.albinus@gmx.de>
Fri, 31 Aug 2012 11:11:06 +0000 (13:11 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Fri, 31 Aug 2012 11:11:06 +0000 (13:11 +0200)
  `eshell-external-command'.

lisp/eshell/esh-ext.el

index f9f9b1a558f785cc03fd6e7a7da51764e61d2510..e48213c54d6c74da7bc0d97b99fae61cac52f794 100644 (file)
@@ -207,11 +207,12 @@ causing the user to wonder if anything's really going on..."
 (defun eshell-external-command (command args)
   "Insert output from an external COMMAND, using ARGS."
   (setq args (eshell-stringify-list (eshell-flatten-list args)))
-  ;; (if (file-remote-p default-directory)
-  ;;     (eshell-remote-command command args))
   (let ((interp (eshell-find-interpreter
                 command
-                ;; Do not examine remote shell scripts.
+                ;; `eshell-find-interpreter' does not work correctly
+                ;; for Tramp file name syntax.  But we don't need to
+                ;; know the interpreter in that case, therefore the
+                ;; check is suppressed.
                 (or (and (stringp command) (file-remote-p command))
                     (file-remote-p default-directory)))))
     (cl-assert interp)