Mercurial > emacs

changeset 59121:7b2031432b63

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(eshell-find-alias-function): Call symbol-file with `defun'.
author Richard M. Stallman <rms@gnu.org>
date Mon, 27 Dec 2004 16:16:24 +0000
parents b79ba69139eb
children 9b98188d56ae
files lisp/eshell/esh-cmd.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/eshell/esh-cmd.el	Mon Dec 27 16:15:53 2004 +0000
+++ b/lisp/eshell/esh-cmd.el	Mon Dec 27 16:16:24 2004 +0000
@@ -1285,7 +1285,7 @@
 (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