mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-05 20:43:08 +00:00
Code Issues Releases Activity

(symbol-file): Remove unused variable `functions'.

Browse Source
This commit is contained in:
John Paul Wallington 2002-11-20 12:58:37 +00:00
parent c595cc5fbd
commit cb21744eb5
2 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,3 +1,7 @@
2002-11-20 John Paul Wallington <jpw@shootybangbang.com>
* subr.el (symbol-file): Remove unused variable `functions'.
2002-11-20 Markus Rost <rost@math.ohio-state.edu>
* Makefile.in (setwins_almost): Renamed from finder_setwins.

2
lisp/subr.el
View File

@ -923,7 +923,7 @@ It can also be nil, if the definition is not associated with any file."
(eq 'autoload (car-safe (symbol-function function))))
(nth 1 (symbol-function function))
(let ((files load-history)
file functions)
file)
(while files
(if (memq function (cdr (car files)))
(setq file (car (car files)) files nil))