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

This commit is contained in:
Richard M. Stallman 2005-01-07 02:52:29 +00:00
parent 762566f3a1
commit c7ce7fc43b
2 changed files with 11 additions and 1 deletions

View file

@ -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