From cb21744eb592bad08cb4b5e6357f267506ad9722 Mon Sep 17 00:00:00 2001
From: John Paul Wallington <jpw@pobox.com>
Date: Wed, 20 Nov 2002 12:58:37 +0000
Subject: [PATCH] (symbol-file): Remove unused variable `functions'.

---
 lisp/ChangeLog | 4 ++++
 lisp/subr.el   | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e3bf6c11387..e10f6451474 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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.
diff --git a/lisp/subr.el b/lisp/subr.el
index 17ca52c6292..10e48e7a405 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -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))
-- 
2.11.4.GIT