diff options
| author | Richard M. Stallman <rms@gnu.org> | 2004-12-27 16:16:24 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2004-12-27 16:16:24 +0000 |
| commit | 5cb345c184f835909aed741d09f43c1ff5b8c943 (patch) | |
| tree | f12af688f583afa48a41fecbaa6aca6187b6bc52 /lisp/eshell | |
| parent | c044263ba10e1d07b1c408a71ac17f51b6c9bbbf (diff) | |
| download | emacs-5cb345c184f835909aed741d09f43c1ff5b8c943.tar.gz | |
(eshell-find-alias-function): Call symbol-file with `defun'.
Diffstat (limited to 'lisp/eshell')
| -rw-r--r-- | lisp/eshell/esh-cmd.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/eshell/esh-cmd.el b/lisp/eshell/esh-cmd.el index 477d8b410ec..d7c65066ac6 100644 --- a/lisp/eshell/esh-cmd.el +++ b/lisp/eshell/esh-cmd.el @@ -1285,7 +1285,7 @@ COMMAND may result in an alias being executed, or a plain command." (defun eshell-find-alias-function (name) "Check whether a function called `eshell/NAME' exists." (let* ((sym (intern-soft (concat "eshell/" name))) - (file (symbol-file sym))) + (file (symbol-file sym 'defun))) ;; If the function exists, but is defined in an eshell module ;; that's not currently enabled, don't report it as found (if (and file |