Mercurial > emacs

changeset 49031:1f99e20d4977

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(find-variable-noselect): Make it work with new load-history format.
author Dave Love <fx@gnu.org>
date Fri, 03 Jan 2003 21:12:01 +0000
parents 941130502bf4
children 5dbb47300a5b
files lisp/emacs-lisp/find-func.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/find-func.el	Fri Jan 03 20:16:56 2003 +0000
+++ b/lisp/emacs-lisp/find-func.el	Fri Jan 03 21:12:01 2003 +0000
@@ -312,7 +312,8 @@
 `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