From fe3947c39dc5c696cde112af9abd992862f9d0bf Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Wed, 16 Mar 2005 07:41:57 +0000 Subject: [PATCH] (find-function-regexp): Add defun-emitting macro `menu-bar-make-toggle'. --- lisp/ChangeLog | 16 ++++++++++++++++ lisp/emacs-lisp/find-func.el | 3 ++- 2 files changed, 18 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0d12765a479..e9cd1862d0b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,19 @@ +2005-03-16 Juri Linkov + + * emacs-lisp/find-func.el (find-function-regexp): + Add defun-emitting macro `menu-bar-make-toggle'. + + * isearch.el: Put `isearch-scroll' property to + `split-window-horizontally'. + + * info.el: Update error messages for `debug-ignored-errors'. + (Info-isearch-search): Doc fix. + (Info-find-node): Move up code to go into info buffer before + recording the node to the history. + (Info-fontify-node): Fontify titles only if the next line + has two or more `*', `=', `-', `.'. + Display "go to this node" for empty (match-string 3). + 2005-03-16 YAMAMOTO Mitsuharu * term/mac-win.el: Add mouse pointer shape constants. diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el index 18e5706dc3d..eab957e5671 100644 --- a/lisp/emacs-lisp/find-func.el +++ b/lisp/emacs-lisp/find-func.el @@ -63,7 +63,8 @@ (concat "^\\s-*(\\(def\\(ine-skeleton\\|ine-generic-mode\\|ine-derived-mode\\|\ ine-minor-mode\\|un-cvs-mode\\|foo\\|[^cfgv]\\w+\\*?\\)\ -\\|easy-mmode-define-global-mode\\)" find-function-space-re +\\|easy-mmode-define-global-mode\\|menu-bar-make-toggle\\)" + find-function-space-re "\\('\\|\(quote \\)?%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' -- 2.39.2