Mercurial > emacs

changeset 59120:b79ba69139eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(eshell-test-goto-func): Call symbol-file with `defun'.
author Richard M. Stallman <rms@gnu.org>
date Mon, 27 Dec 2004 16:15:53 +0000
parents 803b2fab7ec1
children 7b2031432b63
files lisp/eshell/esh-test.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/eshell/esh-test.el	Mon Dec 27 16:12:11 2004 +0000
+++ b/lisp/eshell/esh-test.el	Mon Dec 27 16:15:53 2004 +0000
@@ -125,7 +125,7 @@
   (let ((fsym (get-text-property (point) 'test-func)))
     (when fsym
       (let* ((def (symbol-function fsym))
-	     (library (locate-library (symbol-file fsym)))
+	     (library (locate-library (symbol-file fsym 'defun)))
 	     (name (substring (symbol-name fsym)
 			      (length "eshell-test--")))
 	     (inhibit-redisplay t))