aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/frame.c36
-rw-r--r--src/nsterm.m5
2 files changed, 27 insertions, 14 deletions
diff --git a/src/frame.c b/src/frame.c
index 7f4bf274ad9..f6053fca3ef 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -5102,15 +5102,19 @@ gui_set_scroll_bar_width (struct frame *f, Lisp_Object arg, Lisp_Object oldval)
5102{ 5102{
5103 int unit = FRAME_COLUMN_WIDTH (f); 5103 int unit = FRAME_COLUMN_WIDTH (f);
5104 5104
5105 if (RANGED_FIXNUMP (1, arg, INT_MAX) 5105 if (RANGED_FIXNUMP (1, arg, INT_MAX))
5106 && XFIXNAT (arg) != FRAME_CONFIG_SCROLL_BAR_WIDTH (f))
5107 { 5106 {
5108 FRAME_CONFIG_SCROLL_BAR_WIDTH (f) = XFIXNAT (arg); 5107 if (XFIXNAT (arg) == FRAME_CONFIG_SCROLL_BAR_WIDTH (f))
5109 FRAME_CONFIG_SCROLL_BAR_COLS (f) = (XFIXNAT (arg) + unit - 1) / unit; 5108 return;
5110 if (FRAME_NATIVE_WINDOW (f)) 5109 else
5111 adjust_frame_size (f, -1, -1, 3, 0, Qscroll_bar_width); 5110 {
5111 FRAME_CONFIG_SCROLL_BAR_WIDTH (f) = XFIXNAT (arg);
5112 FRAME_CONFIG_SCROLL_BAR_COLS (f) = (XFIXNAT (arg) + unit - 1) / unit;
5113 if (FRAME_NATIVE_WINDOW (f))
5114 adjust_frame_size (f, -1, -1, 3, 0, Qscroll_bar_width);
5112 5115
5113 SET_FRAME_GARBAGED (f); 5116 SET_FRAME_GARBAGED (f);
5117 }
5114 } 5118 }
5115 else 5119 else
5116 { 5120 {
@@ -5133,15 +5137,19 @@ gui_set_scroll_bar_height (struct frame *f, Lisp_Object arg, Lisp_Object oldval)
5133#if USE_HORIZONTAL_SCROLL_BARS 5137#if USE_HORIZONTAL_SCROLL_BARS
5134 int unit = FRAME_LINE_HEIGHT (f); 5138 int unit = FRAME_LINE_HEIGHT (f);
5135 5139
5136 if (RANGED_FIXNUMP (1, arg, INT_MAX) 5140 if (RANGED_FIXNUMP (1, arg, INT_MAX))
5137 && XFIXNAT (arg) != FRAME_CONFIG_SCROLL_BAR_HEIGHT (f))
5138 { 5141 {
5139 FRAME_CONFIG_SCROLL_BAR_HEIGHT (f) = XFIXNAT (arg); 5142 if (XFIXNAT (arg) == FRAME_CONFIG_SCROLL_BAR_HEIGHT (f))
5140 FRAME_CONFIG_SCROLL_BAR_LINES (f) = (XFIXNAT (arg) + unit - 1) / unit; 5143 return;
5141 if (FRAME_NATIVE_WINDOW (f)) 5144 else
5142 adjust_frame_size (f, -1, -1, 3, 0, Qscroll_bar_height); 5145 {
5146 FRAME_CONFIG_SCROLL_BAR_HEIGHT (f) = XFIXNAT (arg);
5147 FRAME_CONFIG_SCROLL_BAR_LINES (f) = (XFIXNAT (arg) + unit - 1) / unit;
5148 if (FRAME_NATIVE_WINDOW (f))
5149 adjust_frame_size (f, -1, -1, 3, 0, Qscroll_bar_height);
5143 5150
5144 SET_FRAME_GARBAGED (f); 5151 SET_FRAME_GARBAGED (f);
5152 }
5145 } 5153 }
5146 else 5154 else
5147 { 5155 {
diff --git a/src/nsterm.m b/src/nsterm.m
index 205b1621399..dceb3cebb4d 100644
--- a/src/nsterm.m
+++ b/src/nsterm.m
@@ -8524,6 +8524,11 @@ ns_in_echo_area (void)
8524 8524
8525 NSTRACE ("[EmacsView toggleFullScreen:]"); 8525 NSTRACE ("[EmacsView toggleFullScreen:]");
8526 8526
8527 /* Reset fs_is_native to value of ns-use-native-full-screen if not
8528 fullscreen already */
8529 if (fs_state != FULLSCREEN_BOTH)
8530 fs_is_native = ns_use_native_fullscreen;
8531
8527 if (fs_is_native) 8532 if (fs_is_native)
8528 { 8533 {
8529#if defined (NS_IMPL_COCOA) && MAC_OS_X_VERSION_MAX_ALLOWED >= 1070 8534#if defined (NS_IMPL_COCOA) && MAC_OS_X_VERSION_MAX_ALLOWED >= 1070