diff options
| author | Pavel Janík | 2001-12-25 11:16:02 +0000 |
|---|---|---|
| committer | Pavel Janík | 2001-12-25 11:16:02 +0000 |
| commit | 2cb48ea3ff0f4aab56ba879fa33ec89e8e70d210 (patch) | |
| tree | 63b8a70b8287cc99233c92efabbd3b2bb64d21b6 /lisp/vt-control.el | |
| parent | 041f4d74cc97300dddd9d238839be4a29c4c93a6 (diff) | |
| download | emacs-2cb48ea3ff0f4aab56ba879fa33ec89e8e70d210.tar.gz emacs-2cb48ea3ff0f4aab56ba879fa33ec89e8e70d210.zip | |
(vt-wide, vt-narrow): Use set-frame-width instead of obsolete
set-screen-width.
Diffstat (limited to 'lisp/vt-control.el')
| -rw-r--r-- | lisp/vt-control.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vt-control.el b/lisp/vt-control.el index 24028528811..0ffc2757046 100644 --- a/lisp/vt-control.el +++ b/lisp/vt-control.el | |||
| @@ -66,14 +66,14 @@ | |||
| 66 | "Set the screen 132 characters wide." | 66 | "Set the screen 132 characters wide." |
| 67 | (interactive) | 67 | (interactive) |
| 68 | (send-string-to-terminal "\e[?3h") | 68 | (send-string-to-terminal "\e[?3h") |
| 69 | (set-screen-width 132) | 69 | (set-frame-width (selected-frame) 132) |
| 70 | (setq vt-wide-p t)) | 70 | (setq vt-wide-p t)) |
| 71 | 71 | ||
| 72 | (defun vt-narrow nil | 72 | (defun vt-narrow nil |
| 73 | "Set the screen 80 characters wide." | 73 | "Set the screen 80 characters wide." |
| 74 | (interactive) | 74 | (interactive) |
| 75 | (send-string-to-terminal "\e[?3l") | 75 | (send-string-to-terminal "\e[?3l") |
| 76 | (set-screen-width 80) | 76 | (set-frame-width (selected-frame) 80) |
| 77 | (setq vt-wide-p nil)) | 77 | (setq vt-wide-p nil)) |
| 78 | 78 | ||
| 79 | (defun vt-toggle-screen nil | 79 | (defun vt-toggle-screen nil |