summaryrefslogtreecommitdiff
path: root/lisp/vt-control.el
diff options
context:
space:
mode:
authorPavel Janík <Pavel@Janik.cz>2001-12-25 11:16:02 +0000
committerPavel Janík <Pavel@Janik.cz>2001-12-25 11:16:02 +0000
commit2cb48ea3ff0f4aab56ba879fa33ec89e8e70d210 (patch)
tree63b8a70b8287cc99233c92efabbd3b2bb64d21b6 /lisp/vt-control.el
parent041f4d74cc97300dddd9d238839be4a29c4c93a6 (diff)
downloademacs-2cb48ea3ff0f4aab56ba879fa33ec89e8e70d210.tar.gz
(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.el4
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 @@
"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