[Emacs-diffs] /srv/bzr/emacs/trunk r109830: * eshell/esh-ext.el: Explain, why we suppress the check in

[Michael Albinus]

------------------------------------------------------------
revno: 109830
committer: Michael Albinus <address@hidden
branch nick: trunk
timestamp: Fri 2012-08-31 13:11:06 +0200
message:
  * eshell/esh-ext.el: Explain, why we suppress the check in
    `eshell-external-command'.
modified:
  lisp/eshell/esh-ext.el

=== modified file 'lisp/eshell/esh-ext.el'
--- a/lisp/eshell/esh-ext.el    2012-08-29 12:49:44 +0000
+++ b/lisp/eshell/esh-ext.el    2012-08-31 11:11:06 +0000
@@ -207,11 +207,12 @@
 (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)