diff src/xfaces.c @ 40838:bf08eafda9a3

(merge_face_vectors): Use braces to follow GNU Coding Standards. (Finternal_set_lisp_face_attribute): Likewise.
author Pavel Janík <Pavel@Janik.cz>
date Fri, 09 Nov 2001 06:46:22 +0000
parents cdfd4d09b79a
children 566c75efb733
line wrap: on
line diff
--- a/src/xfaces.c	Fri Nov 09 06:22:21 2001 +0000
+++ b/src/xfaces.c	Fri Nov 09 06:46:22 2001 +0000
@@ -3310,10 +3310,12 @@
 
   for (i = 1; i < LFACE_VECTOR_SIZE; ++i)
     if (!UNSPECIFIEDP (from[i]))
-      if (i == LFACE_HEIGHT_INDEX && !INTEGERP (from[i]))
-	to[i] = merge_face_heights (from[i], to[i], to[i], cycle_check);
-      else
-	to[i] = from[i];
+      {
+	if (i == LFACE_HEIGHT_INDEX && !INTEGERP (from[i]))
+	  to[i] = merge_face_heights (from[i], to[i], to[i], cycle_check);
+	else
+	  to[i] = from[i];
+      }
 
   /* TO is always an absolute face, which should inherit from nothing.
      We blindly copy the :inherit attribute above and fix it up here.  */
@@ -4185,20 +4187,22 @@
 	}
 
       if (!NILP (param))
-	if (EQ (frame, Qt))
-	  /* Update `default-frame-alist', which is used for new frames.  */
-	  {
-	    store_in_alist (&Vdefault_frame_alist, param, value);
-	  }
-	else
-	  /* Update the current frame's parameters.  */
-	  {
-	    Lisp_Object cons;
-	    cons = XCAR (Vparam_value_alist);
-	    XSETCAR (cons, param);
-	    XSETCDR (cons, value);
-	    Fmodify_frame_parameters (frame, Vparam_value_alist);
-	  }
+	{
+	  if (EQ (frame, Qt))
+	    /* Update `default-frame-alist', which is used for new frames.  */
+	    {
+	      store_in_alist (&Vdefault_frame_alist, param, value);
+	    }
+	  else
+	    /* Update the current frame's parameters.  */
+	    {
+	      Lisp_Object cons;
+	      cons = XCAR (Vparam_value_alist);
+	      XSETCAR (cons, param);
+	      XSETCDR (cons, value);
+	      Fmodify_frame_parameters (frame, Vparam_value_alist);
+	    }
+	}
     }
 
   return face;