From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 29 Aug 1999 18:15:29 +0000 (+0000)
Subject: (find-function-regexp): Allow a ) or ( to end a function name.
X-Git-Tag: emacs-pretest-21.0.90~7017
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=848e837103d40ba1bbcefa500fa000f6f4c9364a;p=emacs.git

(find-function-regexp): Allow a ) or ( to end a function name.
---

diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el
index 3ae98c08a39..e7607494d04 100644
--- a/lisp/emacs-lisp/find-func.el
+++ b/lisp/emacs-lisp/find-func.el
@@ -60,7 +60,7 @@
   ;;  (define-derived-mode foo ...), (easy-mmode-define-minor-mode foo)
   "^\\s-*(\\(def\\(ine-skeleton\\|ine-generic-mode\\|ine-derived-mode\\|\
 \[^cgv\W]\\w+\\*?\\)\\|easy-mmode-define-minor-mode\\)\\s-+'?\
-%s\\(\\s-\\|$\\)"
+%s\\(\\s-\\|$\\|\(\\|\)\\)"
   "The regexp used by `find-function' to search for a function definition.
 Note it must contain a `%s' at the place where `format'
 should insert the function name.  The default value avoids `defconst',