diff options
| author | Juri Linkov | 2005-03-16 07:41:57 +0000 |
|---|---|---|
| committer | Juri Linkov | 2005-03-16 07:41:57 +0000 |
| commit | fe3947c39dc5c696cde112af9abd992862f9d0bf (patch) | |
| tree | c15e9be07f93d94c3d9aff323ef38b93bfb001ca | |
| parent | 7f55d3b75557176a2bcc948795af13d3e78a18a1 (diff) | |
| download | emacs-fe3947c39dc5c696cde112af9abd992862f9d0bf.tar.gz emacs-fe3947c39dc5c696cde112af9abd992862f9d0bf.zip | |
(find-function-regexp): Add defun-emitting macro `menu-bar-make-toggle'.
| -rw-r--r-- | lisp/ChangeLog | 16 | ||||
| -rw-r--r-- | lisp/emacs-lisp/find-func.el | 3 |
2 files changed, 18 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0d12765a479..e9cd1862d0b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,19 @@ | |||
| 1 | 2005-03-16 Juri Linkov <juri@jurta.org> | ||
| 2 | |||
| 3 | * emacs-lisp/find-func.el (find-function-regexp): | ||
| 4 | Add defun-emitting macro `menu-bar-make-toggle'. | ||
| 5 | |||
| 6 | * isearch.el: Put `isearch-scroll' property to | ||
| 7 | `split-window-horizontally'. | ||
| 8 | |||
| 9 | * info.el: Update error messages for `debug-ignored-errors'. | ||
| 10 | (Info-isearch-search): Doc fix. | ||
| 11 | (Info-find-node): Move up code to go into info buffer before | ||
| 12 | recording the node to the history. | ||
| 13 | (Info-fontify-node): Fontify titles only if the next line | ||
| 14 | has two or more `*', `=', `-', `.'. | ||
| 15 | Display "go to this node" for empty (match-string 3). | ||
| 16 | |||
| 1 | 2005-03-16 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> | 17 | 2005-03-16 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> |
| 2 | 18 | ||
| 3 | * term/mac-win.el: Add mouse pointer shape constants. | 19 | * 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 @@ | |||
| 63 | (concat | 63 | (concat |
| 64 | "^\\s-*(\\(def\\(ine-skeleton\\|ine-generic-mode\\|ine-derived-mode\\|\ | 64 | "^\\s-*(\\(def\\(ine-skeleton\\|ine-generic-mode\\|ine-derived-mode\\|\ |
| 65 | ine-minor-mode\\|un-cvs-mode\\|foo\\|[^cfgv]\\w+\\*?\\)\ | 65 | ine-minor-mode\\|un-cvs-mode\\|foo\\|[^cfgv]\\w+\\*?\\)\ |
| 66 | \\|easy-mmode-define-global-mode\\)" find-function-space-re | 66 | \\|easy-mmode-define-global-mode\\|menu-bar-make-toggle\\)" |
| 67 | find-function-space-re | ||
| 67 | "\\('\\|\(quote \\)?%s\\(\\s-\\|$\\|\(\\|\)\\)") | 68 | "\\('\\|\(quote \\)?%s\\(\\s-\\|$\\|\(\\|\)\\)") |
| 68 | "The regexp used by `find-function' to search for a function definition. | 69 | "The regexp used by `find-function' to search for a function definition. |
| 69 | Note it must contain a `%s' at the place where `format' | 70 | Note it must contain a `%s' at the place where `format' |