Mercurial > emacs
changeset 72076:3272294d88e3
(find-function-search-for-symbol): Handle "C-h f `".
| author | Nick Roberts <nickrob@snap.net.nz> |
|---|---|
| date | Sat, 22 Jul 2006 22:51:11 +0000 |
| parents | 538434fd1d5d |
| children | e345212112f0 |
| files | lisp/emacs-lisp/find-func.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- 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))