aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorNick Roberts2006-07-22 22:51:11 +0000
committerNick Roberts2006-07-22 22:51:11 +0000
commit7358462606bab3c5c33dccc133770955bc68bc90 (patch)
tree88e2cf51bca17af248aadb92f6c438cff0b1ebd3
parent52c13c9b68ba0d47c5ad8e26694bb65dcf075b96 (diff)
downloademacs-7358462606bab3c5c33dccc133770955bc68bc90.tar.gz
emacs-7358462606bab3c5c33dccc133770955bc68bc90.zip
(find-function-search-for-symbol): Handle "C-h f `".
-rw-r--r--lisp/emacs-lisp/find-func.el4
1 files changed, 3 insertions, 1 deletions
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."
226 (regexp-symbol (cdr (assq type find-function-regexp-alist)))) 226 (regexp-symbol (cdr (assq type find-function-regexp-alist))))
227 (with-current-buffer (find-file-noselect filename) 227 (with-current-buffer (find-file-noselect filename)
228 (let ((regexp (format (symbol-value regexp-symbol) 228 (let ((regexp (format (symbol-value regexp-symbol)
229 (regexp-quote (symbol-name symbol)))) 229 ;; Catch ` (backquote) macro.
230 (concat "\\\\?"
231 (regexp-quote (symbol-name symbol)))))
230 (case-fold-search)) 232 (case-fold-search))
231 (with-syntax-table emacs-lisp-mode-syntax-table 233 (with-syntax-table emacs-lisp-mode-syntax-table
232 (goto-char (point-min)) 234 (goto-char (point-min))