# HG changeset patch
# User Nick Roberts <nickrob@snap.net.nz>
# Date 1153608671 0
# Node ID 3272294d88e3b8aed1b1c336242cd5c7a48b85cf
# Parent  538434fd1d5d17505ab270073a8c54e7fc8eb000
(find-function-search-for-symbol): Handle "C-h f `".

diff -r 538434fd1d5d -r 3272294d88e3 lisp/emacs-lisp/find-func.el
--- a/lisp/emacs-lisp/find-func.el	Sat Jul 22 22:50:46 2006 +0000
+++ b/lisp/emacs-lisp/find-func.el	Sat Jul 22 22:51:11 2006 +0000
@@ -226,7 +226,9 @@
 	   (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))