diff options
| author | Richard M. Stallman | 1997-05-05 04:19:41 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-05-05 04:19:41 +0000 |
| commit | 05e9907c40cf5a5fc3fc54025af29c773a57586e (patch) | |
| tree | 50fc1b0a51a47103ab844519db484c74fdd1b251 | |
| parent | 2d902813fa3c2d86538b72888198212d416b2fc1 (diff) | |
| download | emacs-05e9907c40cf5a5fc3fc54025af29c773a57586e.tar.gz emacs-05e9907c40cf5a5fc3fc54025af29c773a57586e.zip | |
(wordstar-mode): Add a mode-class property.
| -rw-r--r-- | lisp/emulation/ws-mode.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emulation/ws-mode.el b/lisp/emulation/ws-mode.el index 91f8b0170fc..93bb0a05a62 100644 --- a/lisp/emulation/ws-mode.el +++ b/lisp/emulation/ws-mode.el | |||
| @@ -181,6 +181,8 @@ | |||
| 181 | (define-key wordstar-C-q-map "\C-y" 'ws-kill-eol) | 181 | (define-key wordstar-C-q-map "\C-y" 'ws-kill-eol) |
| 182 | (define-key wordstar-C-q-map "\177" 'ws-kill-bol)) | 182 | (define-key wordstar-C-q-map "\177" 'ws-kill-bol)) |
| 183 | 183 | ||
| 184 | (put 'wordstar-mode 'mode-class 'special) | ||
| 185 | |||
| 184 | ;;;###autoload | 186 | ;;;###autoload |
| 185 | (defun wordstar-mode () | 187 | (defun wordstar-mode () |
| 186 | "Major mode with WordStar-like key bindings. | 188 | "Major mode with WordStar-like key bindings. |