changeset 20246:4aa45a7a62e8

(wordstar-mode): Run wordstar-mode-hook.
author Karl Heuer <kwzh@gnu.org>
date Tue, 11 Nov 1997 02:56:56 +0000
parents 78d833878a81
children 7cb27e61a1d5
files lisp/emulation/ws-mode.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
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 ()