summaryrefslogtreecommitdiff
path: root/lisp/eshell
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2004-06-07 08:36:23 +0000
committerJohn Wiegley <johnw@newartisans.com>2004-06-07 08:36:23 +0000
commitac03c474d9bf561e06c78ace5ad1d021f8b5da66 (patch)
tree3c360bc6741bd6ea9d0b5c959772063996040c65 /lisp/eshell
parent2a05085477089c55a650e2eca767d8cad195d60f (diff)
downloademacs-ac03c474d9bf561e06c78ace5ad1d021f8b5da66.tar.gz
2004-06-06 Emilio C. Lopes <eclig@gmx.net>
* eshell/esh-cmd.el (eshell/which): respect commands quoted with eshell-explicit-command-char
Diffstat (limited to 'lisp/eshell')
-rw-r--r--lisp/eshell/esh-cmd.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/eshell/esh-cmd.el b/lisp/eshell/esh-cmd.el
index 9b4f54ce8bf..477d8b410ec 100644
--- a/lisp/eshell/esh-cmd.el
+++ b/lisp/eshell/esh-cmd.el
@@ -1246,9 +1246,8 @@ be finished later after the completion of an asynchronous subprocess."
(setq program (eshell-search-path name))
(let* ((esym (eshell-find-alias-function name))
(sym (or esym (intern-soft name))))
- (if (and sym (fboundp sym)
- (or esym eshell-prefer-lisp-functions
- (not program)))
+ (if (and (or esym (and sym (fboundp sym)))
+ (or eshell-prefer-lisp-functions (not direct)))
(let ((desc (let ((inhibit-redisplay t))
(save-window-excursion
(prog1