From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 24 Sep 1996 00:37:53 +0000 (+0000)
Subject: (x_window): With Motif, double extra_borders.
X-Git-Tag: emacs-20.1~3639
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=440b0bfd4cfe3ed075a64017493d3693cff81857;p=emacs.git

(x_window): With Motif, double extra_borders.
Use a preprocessor conditional to test for Motif.
---

diff --git a/src/xfns.c b/src/xfns.c
index abb639314ea..96592c6decf 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -2650,12 +2650,14 @@ x_window (f, window_prompting, minibuffer_only)
 
     f->output_data.x->menubar_height = menubar_size;
 
+#ifndef USE_LUCID
     /* Motif seems to need this amount added to the sizes
        specified for the shell widget.  The Athena/Lucid widgets don't.
        Both conclusions reached experimentally.  -- rms.  */
-    if (!strcmp (lwlib_toolkit_type, "motif"))
-      XtVaGetValues (f->output_data.x->edit_widget, XtNinternalBorderWidth,
-		     &extra_borders, NULL);
+    XtVaGetValues (f->output_data.x->edit_widget, XtNinternalBorderWidth,
+		   &extra_borders, NULL);
+    extra_borders *= 2;
+#endif
 
     /* Convert our geometry parameters into a geometry string
        and specify it.