]> git.eshelyaron.com Git - emacs.git/commitdiff
(Finternal_set_lisp_face_attribute): Follow coding conventions.
authorGerd Moellmann <gerd@gnu.org>
Thu, 18 Oct 2001 09:50:37 +0000 (09:50 +0000)
committerGerd Moellmann <gerd@gnu.org>
Thu, 18 Oct 2001 09:50:37 +0000 (09:50 +0000)
src/xfaces.c

index 9971541cd31349926811934d6481d287e7508f34..acb5820db83d96ae708e2dfdff37afe24c1980a9 100644 (file)
@@ -3831,13 +3831,16 @@ FRAME 0 means change the face on all frames, and change the default
     {
       if (!UNSPECIFIEDP (value))
        {
-         Lisp_Object test =
-           (EQ (face, Qdefault) ? value :
-            /* The default face must have an absolute size, otherwise, we do
-               a test merge with a random height to see if VALUE's ok. */
-            merge_face_heights (value, make_number(10), Qnil, Qnil));
+         Lisp_Object test;
 
-         if (!INTEGERP(test) || XINT(test) <= 0)
+         test = (EQ (face, Qdefault)
+                 ? value
+                 /* The default face must have an absolute size,
+                    otherwise, we do a test merge with a random
+                    height to see if VALUE's ok. */
+                 : merge_face_heights (value, make_number (10), Qnil, Qnil));
+
+         if (!INTEGERP (test) || XINT (test) <= 0)
            signal_error ("Invalid face height", value);
        }