(find-function-search-for-symbol): Expand comment.

1 files changed, 4 insertions, 1 deletions

diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el
index fc79da2a914..50b7d8dc9ef 100644
--- a/lisp/emacs-lisp/find-func.el
+++ b/lisp/emacs-lisp/find-func.el
@@ -226,7 +226,10 @@ The search is done in the source for library LIBRARY."
            (regexp-symbol (cdr (assq type find-function-regexp-alist))))
       (with-current-buffer (find-file-noselect filename)
         (let ((regexp (format (symbol-value regexp-symbol)
-                              ;; Catch ` (backquote) macro.
+                              ;; Entry for ` (backquote) macro in loaddefs.el,
+                              ;; (defalias (quote \`)..., has a \ but
+                              ;; (symbol-name symbol) doesn't.  Add an
+                              ;; optional \ to catch this.
                               (concat "\\\\?"
                                       (regexp-quote (symbol-name symbol)))))
               (case-fold-search))