[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/find-func.el

[Richard M . Stallman]

Index: emacs/lisp/emacs-lisp/find-func.el
diff -c emacs/lisp/emacs-lisp/find-func.el:1.53 
emacs/lisp/emacs-lisp/find-func.el:1.54
*** emacs/lisp/emacs-lisp/find-func.el:1.53     Wed Jan  5 19:31:00 2005
--- emacs/lisp/emacs-lisp/find-func.el  Fri Jan  7 02:52:12 2005
***************
*** 418,425 ****
      (let ((library (or file (symbol-file symbol type))))
        (find-function-search-for-symbol symbol type library))))
  
  ;;;###autoload
! (defun find-face (face)
    "Find the definition of FACE.  FACE defaults to the name near point.
  
  Finds the Emacs Lisp library containing the definition of the face
--- 418,427 ----
      (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-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