comparison lisp/term.el @ 17659:a62b21f702b0

(term-mode): Add a mode-class property.
author Richard M. Stallman <rms@gnu.org>
date Mon, 05 May 1997 04:24:01 +0000
parents ae0ba78d6c07
children 56a59138fa6c
comparison
equal deleted inserted replaced
17658:c8e002cdebb2 17659:a62b21f702b0
812 '("Terminal" 812 '("Terminal"
813 [ "Character mode" term-char-mode (term-in-line-mode)] 813 [ "Character mode" term-char-mode (term-in-line-mode)]
814 [ "Line mode" term-line-mode (term-in-char-mode)] 814 [ "Line mode" term-line-mode (term-in-char-mode)]
815 [ "Enable paging" term-pager-toggle (not term-pager-count)] 815 [ "Enable paging" term-pager-toggle (not term-pager-count)]
816 [ "Disable paging" term-pager-toggle term-pager-count]))) 816 [ "Disable paging" term-pager-toggle term-pager-count])))
817
818 (put 'term-mode 'mode-class 'special)
817 819
818 (defun term-mode () 820 (defun term-mode ()
819 "Major mode for interacting with an inferior interpreter. 821 "Major mode for interacting with an inferior interpreter.
820 Interpreter name is same as buffer name, sans the asterisks. 822 Interpreter name is same as buffer name, sans the asterisks.
821 In line sub-mode, return at end of buffer sends line as input, 823 In line sub-mode, return at end of buffer sends line as input,