summaryrefslogtreecommitdiff
path: root/lisp/eshell
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2004-12-27 16:15:53 +0000
committerRichard M. Stallman <rms@gnu.org>2004-12-27 16:15:53 +0000
commitc044263ba10e1d07b1c408a71ac17f51b6c9bbbf (patch)
treef2eb7af1b3c8ce471d1462cf3cf1373ea32ad5e5 /lisp/eshell
parent9c8483538f3f7a8ec57bbd50af8aec45c0778622 (diff)
downloademacs-c044263ba10e1d07b1c408a71ac17f51b6c9bbbf.tar.gz
(eshell-test-goto-func): Call symbol-file with `defun'.
Diffstat (limited to 'lisp/eshell')
-rw-r--r--lisp/eshell/esh-test.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/eshell/esh-test.el b/lisp/eshell/esh-test.el
index 076505da14e..c1b121bbf73 100644
--- a/lisp/eshell/esh-test.el
+++ b/lisp/eshell/esh-test.el
@@ -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))