Changeset 4131 for trunk/lisp/emacs-lisp/find-func.el
- Timestamp:
- 07/29/06 07:48:34 (2 years ago)
- Files:
-
- trunk/lisp/emacs-lisp/find-func.el (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/lisp/emacs-lisp/find-func.el
r4111 r4131 227 227 (with-current-buffer (find-file-noselect filename) 228 228 (let ((regexp (format (symbol-value regexp-symbol) 229 (regexp-quote (symbol-name symbol)))) 229 ;; Entry for ` (backquote) macro in loaddefs.el, 230 ;; (defalias (quote \`)..., has a \ but 231 ;; (symbol-name symbol) doesn't. Add an 232 ;; optional \ to catch this. 233 (concat "\\\\?" 234 (regexp-quote (symbol-name symbol))))) 230 235 (case-fold-search)) 231 236 (with-syntax-table emacs-lisp-mode-syntax-table
