From: Jim Blandy <jimb@redhat.com>
Date: Fri, 14 Sep 1990 19:07:14 +0000 (+0000)
Subject: Initial revision
X-Git-Tag: emacs-19.34~15724
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=942f076cef98d38772aacc66e15b7cf93641a75e;p=emacs.git

Initial revision
---

diff --git a/lisp/term/vt200.el b/lisp/term/vt200.el
new file mode 100644
index 00000000000..162baecd7c1
--- /dev/null
+++ b/lisp/term/vt200.el
@@ -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))