Initial revision

This commit is contained in:
Jim Blandy 1990-09-14 19:07:14 +00:00
parent f55fb75ca1
commit 942f076cef

9
lisp/term/vt200.el Normal file
View file

@ -0,0 +1,9 @@
(defun terminal-80-columns ()
(interactive)
(send-string-to-terminal "\033[?3l")
(set-screen-width 80))
(defun terminal-132-columns ()
(interactive)
(send-string-to-terminal "\033[?3h")
(set-screen-width 132))