Mercurial > emacs
changeset 16260:4468f3277e80
(term_init): Use new vertical scroll bar enumerated type.
Use new macro SET_FRAME_WIDTH.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 21 Sep 1996 02:25:37 +0000 |
parents | f54af1701a5f |
children | c8a6a5b01690 |
files | src/term.c |
diffstat | 1 files changed, 9 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/src/term.c Sat Sep 21 02:25:11 1996 +0000 +++ b/src/term.c Sat Sep 21 02:25:37 1996 +0000 @@ -1463,7 +1463,7 @@ baud_rate = 19200; FRAME_CAN_HAVE_SCROLL_BARS (selected_frame) = 0; - FRAME_HAS_VERTICAL_SCROLL_BARS (selected_frame) = 0; + FRAME_VERTICAL_SCROLL_BAR_TYPE (selected_frame) = vertical_scroll_bar_none; return; #endif /* WINDOWSNT */ @@ -1593,10 +1593,13 @@ } if (FRAME_WIDTH (selected_frame) <= 0) - FRAME_WIDTH (selected_frame) = tgetnum ("co"); + SET_FRAME_WIDTH (selected_frame, tgetnum ("co")); + else + /* Keep width and external_width consistent */ + SET_FRAME_WIDTH (selected_frame, FRAME_WIDTH (selected_frame)); if (FRAME_HEIGHT (selected_frame) <= 0) FRAME_HEIGHT (selected_frame) = tgetnum ("li"); - + if (FRAME_HEIGHT (selected_frame) < 3 || FRAME_WIDTH (selected_frame) < 3) fatal ("Screen size %dx%d is too small.\n", @@ -1758,7 +1761,8 @@ /* Remove width of standout marker from usable width of line */ if (TN_standout_width > 0) - FRAME_WIDTH (selected_frame) -= TN_standout_width; + SET_FRAME_WIDTH (selected_frame, + FRAME_WIDTH (selected_frame) - TN_standout_width); UseTabs = tabs_safe_p () && TabWidth == 8; @@ -1782,7 +1786,7 @@ baud_rate = 9600; FRAME_CAN_HAVE_SCROLL_BARS (selected_frame) = 0; - FRAME_HAS_VERTICAL_SCROLL_BARS (selected_frame) = 0; + FRAME_VERTICAL_SCROLL_BAR_TYPE (selected_frame) = vertical_scroll_bar_none; } /* VARARGS 1 */