diff options
| author | Richard M. Stallman | 1997-05-05 00:59:28 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-05-05 00:59:28 +0000 |
| commit | e9904b596ab6aeda3d98d25e143d6a3a7b936cd0 (patch) | |
| tree | b782bbd1b5ff657a21c127e538411921f1e627a8 | |
| parent | 7f25f98011787d2e02959a5f34ffbcbb5719a0e6 (diff) | |
| download | emacs-e9904b596ab6aeda3d98d25e143d6a3a7b936cd0.tar.gz emacs-e9904b596ab6aeda3d98d25e143d6a3a7b936cd0.zip | |
(shell-mode): Add a mode-class property.
| -rw-r--r-- | lisp/shell.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/shell.el b/lisp/shell.el index 66a5653cbdb..93391b8cad8 100644 --- a/lisp/shell.el +++ b/lisp/shell.el | |||
| @@ -313,6 +313,8 @@ Thus, this does not include the shell's current directory.") | |||
| 313 | 313 | ||
| 314 | ;;; Basic Procedures | 314 | ;;; Basic Procedures |
| 315 | 315 | ||
| 316 | (put 'shell-mode 'mode-class 'special) | ||
| 317 | |||
| 316 | (defun shell-mode () | 318 | (defun shell-mode () |
| 317 | "Major mode for interacting with an inferior shell. | 319 | "Major mode for interacting with an inferior shell. |
| 318 | \\[comint-send-input] after the end of the process' output sends the text from | 320 | \\[comint-send-input] after the end of the process' output sends the text from |