From: Nick Roberts <nickrob@snap.net.nz>
Date: Sat, 22 Jul 2006 22:51:11 +0000 (+0000)
Subject: (find-function-search-for-symbol): Handle "C-h f `".
X-Git-Tag: emacs-pretest-22.0.90~1283
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7358462606bab3c5c33dccc133770955bc68bc90;p=emacs.git

(find-function-search-for-symbol): Handle "C-h f `".
---

diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el
index 41c940f1cec..fc79da2a914 100644
--- a/lisp/emacs-lisp/find-func.el
+++ b/lisp/emacs-lisp/find-func.el
@@ -226,7 +226,9 @@ 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)
-			      (regexp-quote (symbol-name symbol))))
+			      ;; Catch ` (backquote) macro.
+			      (concat "\\\\?"
+				      (regexp-quote (symbol-name symbol)))))
 	      (case-fold-search))
 	  (with-syntax-table emacs-lisp-mode-syntax-table
 	    (goto-char (point-min))