From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 25 Jul 2001 15:04:21 +0000 (+0000)
Subject: (find-function-regexp): Add
X-Git-Tag: emacs-pretest-21.0.105~392
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d2922337c42d6316a34653227c78abf6aca50a02;p=emacs.git

(find-function-regexp): Add
easy-mmode-define-global-mode to the regexp.  Allow newlines
in front of the function name.
---

diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el
index f15b92d1507..db5be92b7b1 100644
--- a/lisp/emacs-lisp/find-func.el
+++ b/lisp/emacs-lisp/find-func.el
@@ -1,6 +1,6 @@
 ;;; find-func.el --- find the definition of the Emacs Lisp function near point
 
-;; Copyright (C) 1997, 1999 Free Software Foundation, Inc.
+;; Copyright (C) 1997, 1999, 2001 Free Software Foundation, Inc.
 
 ;; Author: Jens Petersen <petersen@kurims.kyoto-u.ac.jp>
 ;; Maintainer: petersen@kurims.kyoto-u.ac.jp
@@ -59,7 +59,8 @@
   ;; (define-skeleton foo ...), (define-generic-mode 'foo ...),
   ;;  (define-derived-mode foo ...), (define-minor-mode foo)
   "^\\s-*(\\(def\\(ine-skeleton\\|ine-generic-mode\\|ine-derived-mode\\|\
-\[^cgv\W]\\w+\\*?\\)\\|define-minor-mode\\)\\s-+'?\
+\[^cgv\W]\\w+\\*?\\)\\|define-minor-mode\
+\\|easy-mmode-define-global-mode\\)\\(\\s-\\|\n\\)+'?\
 %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'