aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGerd Moellmann2001-07-25 15:04:21 +0000
committerGerd Moellmann2001-07-25 15:04:21 +0000
commitd2922337c42d6316a34653227c78abf6aca50a02 (patch)
tree3dacfbd14d2af36c6a6707260428b8148e516631
parent17635d50f6e2376ccee22aa37ee50f1edff085cd (diff)
downloademacs-d2922337c42d6316a34653227c78abf6aca50a02.tar.gz
emacs-d2922337c42d6316a34653227c78abf6aca50a02.zip
(find-function-regexp): Add
easy-mmode-define-global-mode to the regexp. Allow newlines in front of the function name.
-rw-r--r--lisp/emacs-lisp/find-func.el5
1 files changed, 3 insertions, 2 deletions
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 @@
1;;; find-func.el --- find the definition of the Emacs Lisp function near point 1;;; find-func.el --- find the definition of the Emacs Lisp function near point
2 2
3;; Copyright (C) 1997, 1999 Free Software Foundation, Inc. 3;; Copyright (C) 1997, 1999, 2001 Free Software Foundation, Inc.
4 4
5;; Author: Jens Petersen <petersen@kurims.kyoto-u.ac.jp> 5;; Author: Jens Petersen <petersen@kurims.kyoto-u.ac.jp>
6;; Maintainer: petersen@kurims.kyoto-u.ac.jp 6;; Maintainer: petersen@kurims.kyoto-u.ac.jp
@@ -59,7 +59,8 @@
59 ;; (define-skeleton foo ...), (define-generic-mode 'foo ...), 59 ;; (define-skeleton foo ...), (define-generic-mode 'foo ...),
60 ;; (define-derived-mode foo ...), (define-minor-mode foo) 60 ;; (define-derived-mode foo ...), (define-minor-mode foo)
61 "^\\s-*(\\(def\\(ine-skeleton\\|ine-generic-mode\\|ine-derived-mode\\|\ 61 "^\\s-*(\\(def\\(ine-skeleton\\|ine-generic-mode\\|ine-derived-mode\\|\
62\[^cgv\W]\\w+\\*?\\)\\|define-minor-mode\\)\\s-+'?\ 62\[^cgv\W]\\w+\\*?\\)\\|define-minor-mode\
63\\|easy-mmode-define-global-mode\\)\\(\\s-\\|\n\\)+'?\
63%s\\(\\s-\\|$\\|\(\\|\)\\)" 64%s\\(\\s-\\|$\\|\(\\|\)\\)"
64 "The regexp used by `find-function' to search for a function definition. 65 "The regexp used by `find-function' to search for a function definition.
65Note it must contain a `%s' at the place where `format' 66Note it must contain a `%s' at the place where `format'