changeset 32147:f7c3f0fff3e7

(apropos-mode): Use define-derived-mode.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 04 Oct 2000 23:30:51 +0000
parents e5229d4b9f90
children bb6d168a6387
files lisp/apropos.el
diffstat 1 files changed, 2 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/apropos.el	Wed Oct 04 23:16:46 2000 +0000
+++ b/lisp/apropos.el	Wed Oct 04 23:30:51 2000 +0000
@@ -128,16 +128,10 @@
   "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)