(find-face-definition): Renamed from find-face.

2 files changed, 11 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9be77b5d0c3..eb17386d567 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-01-06  Richard M. Stallman  <rms@gnu.org>
+
+        * emacs-lisp/find-func.el (find-face-definition):
+        Renamed from find-face.
+
 2005-01-06  Kim F. Storm  <storm@cua.dk>
 
         * simple.el (completion-list-mode-map): Map follow-link to mouse-face.
@@ -32,6 +37,9 @@
 
 2005-01-05  Richard M. Stallman  <rms@gnu.org>
 
+        * custom.el (custom-set-variables, custom-theme-set-variables):
+        Clarify documentation.
+
         * emacs-lisp/find-func.el (find-variable)
         (find-variable-other-window, find-variable-other-frame):
         Fix the TYPE args to find-function-read and find-function-do-it.
diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el
index 49e44ca5fee..7e2ac5aa883 100644
--- a/lisp/emacs-lisp/find-func.el
+++ b/lisp/emacs-lisp/find-func.el
@@ -418,8 +418,10 @@ The library where SYMBOL is defined is searched for in FILE or
     (let ((library (or file (symbol-file symbol type))))
       (find-function-search-for-symbol symbol type library))))
 
+;; For symmetry, this should be called find-face; but some programs
+;; assume that, if that name is defined, it means something else.
 ;;;###autoload
-(defun find-face (face)
+(defun find-face-definition (face)
   "Find the definition of FACE.  FACE defaults to the name near point.
 
 Finds the Emacs Lisp library containing the definition of the face