changeset 69921:055c0dc190ac

(find-function-regexp): Allow dashes in defun name, in similar fashion to find-variable-regexp.
author Bill Wohler <wohler@newt.com>
date Mon, 10 Apr 2006 22:33:51 +0000
parents 6dce72f812e7
children dc1f0ab7e276
files lisp/ChangeLog lisp/emacs-lisp/find-func.el
diffstat 2 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Mon Apr 10 20:11:12 2006 +0000
+++ b/lisp/ChangeLog	Mon Apr 10 22:33:51 2006 +0000
@@ -1,3 +1,8 @@
+2006-04-10  Bill Wohler  <wohler@newt.com>
+
+	* emacs-lisp/find-func.el (find-function-regexp): Allow dashes in
+	defun name, in similar fashion to find-variable-regexp.
+
 2006-04-10  Eli Zaretskii  <eliz@gnu.org>
 
 	* international/mule-cmds.el (set-locale-environment): Fix last
--- a/lisp/emacs-lisp/find-func.el	Mon Apr 10 20:11:12 2006 +0000
+++ b/lisp/emacs-lisp/find-func.el	Mon Apr 10 22:33:51 2006 +0000
@@ -64,7 +64,7 @@
   (concat
    "^\\s-*(\\(def\\(ine-skeleton\\|ine-generic-mode\\|ine-derived-mode\\|\
 ine\\(?:-global\\)?-minor-mode\\|ine-compilation-mode\\|un-cvs-mode\\|\
-foo\\|[^cfgv]\\w+\\*?\\)\\|easy-mmode-define-[a-z-]+\\|easy-menu-define\\|\
+foo\\|[^cfgv]\\(\\w\\|\\s_\\)+\\*?\\)\\|easy-mmode-define-[a-z-]+\\|easy-menu-define\\|\
 menu-bar-make-toggle\\)"
    find-function-space-re
    "\\('\\|\(quote \\)?%s\\(\\s-\\|$\\|\(\\|\)\\)")