60 |
;; (define-derived-mode foo ...), (define-minor-mode foo) |
;; (define-derived-mode foo ...), (define-minor-mode foo) |
61 |
"^\\s-*(\\(def\\(ine-skeleton\\|ine-generic-mode\\|ine-derived-mode\\|\ |
"^\\s-*(\\(def\\(ine-skeleton\\|ine-generic-mode\\|ine-derived-mode\\|\ |
62 |
\[^cgv\W]\\w+\\*?\\)\\|define-minor-mode\ |
\[^cgv\W]\\w+\\*?\\)\\|define-minor-mode\ |
63 |
\\|easy-mmode-define-global-mode\\)\\(\\s-\\|\n\\)+'?\ |
\\|easy-mmode-define-global-mode\\)\\(\\s-\\|\n\\)+\\('\\|\(quote \\)?\ |
64 |
%s\\(\\s-\\|$\\|\(\\|\)\\)" |
%s\\(\\s-\\|$\\|\(\\|\)\\)" |
65 |
"The regexp used by `find-function' to search for a function definition. |
"The regexp used by `find-function' to search for a function definition. |
66 |
Note it must contain a `%s' at the place where `format' |
Note it must contain a `%s' at the place where `format' |
108 |
|
|
109 |
;;; Functions: |
;;; Functions: |
110 |
|
|
111 |
|
;;;###autoload |
112 |
(defun find-function-search-for-symbol (symbol variable-p library) |
(defun find-function-search-for-symbol (symbol variable-p library) |
113 |
"Search for SYMBOL. |
"Search for SYMBOL. |
114 |
If VARIABLE-P is nil, `find-function-regexp' is used, otherwise |
If VARIABLE-P is nil, `find-function-regexp' is used, otherwise |