# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 862805981 0
# Node ID 8116c68d8a77fdad42721c498d37f742aa691277
# Parent  7b61d509af8a42e3971b191db8907ca9cff3d630
(wordstar-mode): Add a mode-class property.

diff -r 7b61d509af8a -r 8116c68d8a77 lisp/emulation/ws-mode.el
--- a/lisp/emulation/ws-mode.el	Mon May 05 04:18:33 1997 +0000
+++ b/lisp/emulation/ws-mode.el	Mon May 05 04:19:41 1997 +0000
@@ -181,6 +181,8 @@
   (define-key wordstar-C-q-map "\C-y" 'ws-kill-eol)
   (define-key wordstar-C-q-map "\177" 'ws-kill-bol))
 
+(put 'wordstar-mode 'mode-class 'special)
+
 ;;;###autoload
 (defun wordstar-mode ()
   "Major mode with WordStar-like key bindings.