changeset 16300:0a31bd9ca4bb

(EmacsFrameSetValues): Copy internal_border_width from the Emacs frame if caller isn't changing it.
author Richard M. Stallman <rms@gnu.org>
date Mon, 23 Sep 1996 04:40:39 +0000
parents 0e4f99bad2ec
children a02555b4b2b9
files src/widget.c
diffstat 1 files changed, 11 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/widget.c	Mon Sep 23 04:39:19 1996 +0000
+++ b/src/widget.c	Mon Sep 23 04:40:39 1996 +0000
@@ -796,6 +796,7 @@
   Boolean has_to_recompute_size;
   Boolean has_to_recompute_gcs;
   Boolean has_to_update_hints;
+  Boolean has_to_update_internal_border_width;
 
   int char_width, char_height;
   Dimension pixel_width;
@@ -814,6 +815,10 @@
 
   has_to_update_hints = (cur->emacs_frame.font != new->emacs_frame.font);
 
+  has_to_update_internal_border_width
+    = (cur->emacs_frame.internal_border_width
+       != new->emacs_frame.internal_border_width);
+
   if (has_to_recompute_gcs)
     {
       setup_frame_gcs (new);
@@ -839,6 +844,12 @@
   if (has_to_update_hints)
     update_wm_hints (new);
 
+  /* Don't clobber the internal_border_width
+     if the caller did not try to change it.  */
+  if (! has_to_update_internal_border_width)
+    new->emacs_frame.internal_border_width
+      = new->emacs_frame.frame->output_data.x->internal_border_width;
+
   update_various_frame_slots (new);
 
   /* #### This doesn't work, I haven't been able to find ANY kludge that