diff lisp/emulation/ws-mode.el @ 20246:4aa45a7a62e8

(wordstar-mode): Run wordstar-mode-hook.
author Karl Heuer <kwzh@gnu.org>
date Tue, 11 Nov 1997 02:56:56 +0000
parents 11218164bc54
children 0f4506820432
line wrap: on
line diff
--- a/lisp/emulation/ws-mode.el	Tue Nov 11 02:55:34 1997 +0000
+++ b/lisp/emulation/ws-mode.el	Tue Nov 11 02:56:56 1997 +0000
@@ -293,7 +293,8 @@
   (kill-all-local-variables)
   (use-local-map wordstar-mode-map)
   (setq mode-name "WordStar")
-  (setq major-mode 'wordstar-mode))
+  (setq major-mode 'wordstar-mode)
+  (run-hooks 'wordstar-mode-hook))
 
 
 (defun wordstar-center-paragraph ()