diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2000-10-04 23:30:51 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2000-10-04 23:30:51 +0000 |
| commit | 38ab866cad7982a1191dce83acd4b539287b16fe (patch) | |
| tree | 91980cf13573a170aa6672f4df9d6ffdeccb23dd /lisp/apropos.el | |
| parent | 35810b6fff166eb28ff908b7d4f1d974fd9d4fca (diff) | |
| download | emacs-38ab866cad7982a1191dce83acd4b539287b16fe.tar.gz | |
(apropos-mode): Use define-derived-mode.
Diffstat (limited to 'lisp/apropos.el')
| -rw-r--r-- | lisp/apropos.el | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el index c184a689bf6..fe441219e99 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el @@ -128,16 +128,10 @@ for the regexp; the part that matches gets displayed in this font." "Current item in or for `apropos-accumulator'.") ;;;###autoload -(defun apropos-mode () +(define-derived-mode apropos-mode fundamental-mode "Apropos" "Major mode for following hyperlinks in output of apropos commands. -\\{apropos-mode-map}" - (interactive) - (kill-all-local-variables) - (use-local-map apropos-mode-map) - (setq major-mode 'apropos-mode - mode-name "Apropos") - (run-hooks 'apropos-mode-hook)) +\\{apropos-mode-map}") ;;;###autoload (defun apropos-variable (regexp &optional do-all) |