mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-03 22:20:52 -08:00
Code Issues Projects Releases Wiki Activity

(vt-wide, vt-narrow): Use set-frame-width instead of obsolete

Browse source 
set-screen-width.
This commit is contained in:
Pavel Janík 2001-12-25 11:16:02 +00:00
parent 041f4d74cc
commit 2cb48ea3ff
2 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2001-12-25 Pavel Jan,Bm(Bk <Pavel@Janik.cz>
* vt-control.el (vt-wide, vt-narrow): Use set-frame-width instead
of obsolete set-screen-width.
* locate.el (locate): Remove dot at the end of error argument.
* emerge.el (emerge-show-file-name): Use frame-height instead of

4
lisp/vt-control.el
View file

@ -66,14 +66,14 @@
"Set the screen 132 characters wide."
(interactive)
(send-string-to-terminal "\e[?3h")
(set-screen-width 132)
(set-frame-width (selected-frame) 132)
(setq vt-wide-p t))
(defun vt-narrow nil
"Set the screen 80 characters wide."
(interactive)
(send-string-to-terminal "\e[?3l")
(set-screen-width 80)
(set-frame-width (selected-frame) 80)
(setq vt-wide-p nil))
(defun vt-toggle-screen nil