annotate lisp/term/vt200.el @ 1225:e16f52a7c9f9

New version from sk. Further hacked: (find-grep-dired): Use ! -type d, not -type f.
author Roland McGrath <roland@gnu.org>
date Sun, 27 Sep 1992 01:24:00 +0000
parents c2dbf1fe0506
children e010fc52b552
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
94
23502d381550 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1 (defun terminal-80-columns ()
23502d381550 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
2 (interactive)
23502d381550 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
3 (send-string-to-terminal "\033[?3l")
779
c2dbf1fe0506 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 94
diff changeset
4 (set-frame-width 80))
94
23502d381550 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
5
23502d381550 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
6 (defun terminal-132-columns ()
23502d381550 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
7 (interactive)
23502d381550 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
8 (send-string-to-terminal "\033[?3h")
779
c2dbf1fe0506 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 94
diff changeset
9 (set-frame-width 132))