Mercurial > hg > xemacs-beta
diff lisp/loadhist.el @ 286:57709be46d1b r21-0b41
Import from CVS: tag r21-0b41
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:35:03 +0200 |
parents | 85a06df23a9a |
children | 8626e4521993 |
line wrap: on
line diff
--- a/lisp/loadhist.el Mon Aug 13 10:34:15 2007 +0200 +++ b/lisp/loadhist.el Mon Aug 13 10:35:03 2007 +0200 @@ -37,7 +37,7 @@ (defun symbol-file (sym) "Return the input source from which SYM was loaded. This is a file name, or nil if the source was a buffer with no associated file." - (interactive "S") ; XEmacs + (interactive "SFind source file for symbol: ") ; XEmacs (catch 'foundit (mapcar (function (lambda (x) (if (memq sym (cdr x)) (throw 'foundit (car x)))))