changeset 45257:77ff99d0f7ff

(find-function-search-for-symbol): Handle more whitespace/newline combinations in symbol definitions.
author Markus Rost <rost@math.uni-bielefeld.de>
date Sun, 12 May 2002 19:05:37 +0000
parents ff98f1178f8b
children be966e885dcc
files lisp/emacs-lisp/find-func.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/find-func.el	Sun May 12 17:30:42 2002 +0000
+++ b/lisp/emacs-lisp/find-func.el	Sun May 12 19:05:37 2002 +0000
@@ -145,7 +145,7 @@
 	    (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))