Mercurial > emacs
diff src/xfns.c @ 727:540b047ece4d
*** empty log message ***
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Wed, 24 Jun 1992 05:09:26 +0000 |
parents | 030fb4635335 |
children | 538c0bcb418e |
line wrap: on
line diff
--- a/src/xfns.c Wed Jun 24 05:07:51 1992 +0000 +++ b/src/xfns.c Wed Jun 24 05:09:26 1992 +0000 @@ -1043,6 +1043,10 @@ { CHECK_STRING (arg, 0); + /* Don't change the name if it's already ARG. */ + if (! NILP (Fstring_equal (arg, s->name))) + return; + if (s->display.x->window_desc) { #ifdef HAVE_X11 @@ -1056,7 +1060,6 @@ XSetWMIconName (XDISPLAY s->display.x->window_desc, &prop); UNBLOCK_INPUT; #else - s->name = arg; BLOCK_INPUT; XStoreName (XDISPLAY s->display.x->window_desc, (char *) XSTRING (arg)->data); @@ -1065,6 +1068,8 @@ UNBLOCK_INPUT; #endif } + + s->name = arg; } void @@ -1868,8 +1873,9 @@ build_string ("white"), "background", string); x_default_parameter (s, parms, "border-width", make_number (2), "BorderWidth", number); + /* This defaults to 2 in order to match XTerms. */ x_default_parameter (s, parms, "internal-border-width", - make_number (1), "InternalBorderWidth", number); + make_number (2), "InternalBorderWidth", number); /* Also do the stuff which must be set before the window exists. */ x_default_parameter (s, parms, "foreground-color",