diff options
| author | Dave Love <fx@gnu.org> | 2003-01-03 21:12:01 +0000 |
|---|---|---|
| committer | Dave Love <fx@gnu.org> | 2003-01-03 21:12:01 +0000 |
| commit | 7b1824c287f633ab547d85ecf2b0fff4f03e3596 (patch) | |
| tree | 2ce62bf6bf04df87aabbf95f83871975b1fdab99 /lisp/emacs-lisp | |
| parent | b439e72aa87d4e3491ecdebc0c1aebbe0f48c9c1 (diff) | |
| download | emacs-7b1824c287f633ab547d85ecf2b0fff4f03e3596.tar.gz emacs-7b1824c287f633ab547d85ecf2b0fff4f03e3596.tar.bz2 emacs-7b1824c287f633ab547d85ecf2b0fff4f03e3596.zip | |
(find-variable-noselect): Make it work
with new load-history format.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/find-func.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el index 1ca39b461f7..4192209b7d8 100644 --- a/lisp/emacs-lisp/find-func.el +++ b/lisp/emacs-lisp/find-func.el @@ -312,7 +312,8 @@ The library where VARIABLE is defined is searched for in FILE or `find-function-source-path', if non nil, otherwise in `load-path'." (if (not variable) (error "You didn't specify a variable")) - (let ((library (or file (symbol-file variable)))) + ;; Fixme: I think `symbol-file' should be fixed instead. -- fx + (let ((library (or file (symbol-file (cons 'defvar variable))))) (find-function-search-for-symbol variable 'variable library))) ;;;###autoload |