(find-function-search-for-symbol): Handle more whitespace/newline

combinations in symbol definitions.
2002-05-12 19:05:37 +00:00 · 2002-05-12 19:05:37 +00:00 · 4562c2e45f
commit 4562c2e45f
parent 89e7ad5946
1 changed files with 1 additions and 1 deletions
--- a/lisp/emacs-lisp/find-func.el
+++ b/lisp/emacs-lisp/find-func.el
@ -145,7 +145,7 @@ If VARIABLE-P is nil, `find-function-regexp' is used, otherwise
 	    (goto-char (point-min))
 	    (if (or (re-search-forward regexp nil t)
 		    (re-search-forward
-		     (concat "^([^ ]+ +"
+		     (concat "^([^ ]+\\(\\s-\\|\n\\)+"
 			     (regexp-quote (symbol-name symbol))
 			     "\\>")
 		     nil t))