aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman1996-09-23 04:45:16 +0000
committerRichard M. Stallman1996-09-23 04:45:16 +0000
commitdca975928de6e5b95375bfea2424ba020f251d28 (patch)
tree630035b21bc0d25b768f5861d3afd6d2c487d55b /src
parent3cbd2e0ba0aa8b0f60df09b87695ababeae610c0 (diff)
downloademacs-dca975928de6e5b95375bfea2424ba020f251d28.tar.gz
emacs-dca975928de6e5b95375bfea2424ba020f251d28.zip
(Fx_create_frame): Default Qinternal_border_width to 1.
(x_set_scroll_bar_width): Default the width to 3 cols. Call change_frame_size.
Diffstat (limited to 'src')
-rw-r--r--src/xfns.c6
1 files changed, 4 insertions, 2 deletions
diff --git a/src/xfns.c b/src/xfns.c
index 235081fa3fc..abb639314ea 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -1969,7 +1969,7 @@ x_set_scroll_bar_width (f, arg, oldval)
1969 if (NILP (arg)) 1969 if (NILP (arg))
1970 { 1970 {
1971 FRAME_SCROLL_BAR_PIXEL_WIDTH (f) = 0; 1971 FRAME_SCROLL_BAR_PIXEL_WIDTH (f) = 0;
1972 FRAME_SCROLL_BAR_COLS (f) = 2; 1972 FRAME_SCROLL_BAR_COLS (f) = 3;
1973 if (FRAME_X_WINDOW (f)) 1973 if (FRAME_X_WINDOW (f))
1974 x_set_window_size (f, 0, FRAME_WIDTH (f), FRAME_HEIGHT (f)); 1974 x_set_window_size (f, 0, FRAME_WIDTH (f), FRAME_HEIGHT (f));
1975 } 1975 }
@@ -1982,6 +1982,8 @@ x_set_scroll_bar_width (f, arg, oldval)
1982 if (FRAME_X_WINDOW (f)) 1982 if (FRAME_X_WINDOW (f))
1983 x_set_window_size (f, 0, FRAME_WIDTH (f), FRAME_HEIGHT (f)); 1983 x_set_window_size (f, 0, FRAME_WIDTH (f), FRAME_HEIGHT (f));
1984 } 1984 }
1985
1986 change_frame_size (f, 0, FRAME_WIDTH (f), 0, 0);
1985} 1987}
1986 1988
1987/* Subroutines of creating an X frame. */ 1989/* Subroutines of creating an X frame. */
@@ -3202,7 +3204,7 @@ This function is an internal primitive--use `make-frame' instead.")
3202 parms = Fcons (Fcons (Qinternal_border_width, value), 3204 parms = Fcons (Fcons (Qinternal_border_width, value),
3203 parms); 3205 parms);
3204 } 3206 }
3205 x_default_parameter (f, parms, Qinternal_border_width, make_number (2), 3207 x_default_parameter (f, parms, Qinternal_border_width, make_number (1),
3206 "internalBorderWidth", "BorderWidth", number); 3208 "internalBorderWidth", "BorderWidth", number);
3207 x_default_parameter (f, parms, Qvertical_scroll_bars, Qleft, 3209 x_default_parameter (f, parms, Qvertical_scroll_bars, Qleft,
3208 "verticalScrollBars", "ScrollBars", boolean); 3210 "verticalScrollBars", "ScrollBars", boolean);