aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorPavel Janík2001-11-09 06:47:21 +0000
committerPavel Janík2001-11-09 06:47:21 +0000
commitab8469eb87c14e38dda7560b374be7b971d3d334 (patch)
treeb6474122f9947ec062e5d778f96f56844cff52fa /src
parent40ef1eda444a59c3a76e2a70e478da47c964e9c6 (diff)
downloademacs-ab8469eb87c14e38dda7560b374be7b971d3d334.tar.gz
emacs-ab8469eb87c14e38dda7560b374be7b971d3d334.zip
(merge_face_vectors): Use braces to follow GNU Coding Standards.
(Finternal_set_lisp_face_attribute): Likewise.
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog4
-rw-r--r--src/xfaces.c40
2 files changed, 26 insertions, 18 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 90ea2c07707..c0f15df7fb3 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,9 @@
12001-11-09 Pavel Jan,Bm(Bk <Pavel@Janik.cz> 12001-11-09 Pavel Jan,Bm(Bk <Pavel@Janik.cz>
2 2
3 * xfaces.c (merge_face_vectors): Use braces to follow GNU
4 Coding Standards.
5 (Finternal_set_lisp_face_attribute): Likewise.
6
3 * indent.c (current_column_1): Remove unused variable `prev_col'. 7 * indent.c (current_column_1): Remove unused variable `prev_col'.
4 8
52001-11-07 Jason Rumney <jasonr@gnu.org> 92001-11-07 Jason Rumney <jasonr@gnu.org>
diff --git a/src/xfaces.c b/src/xfaces.c
index afbf3e92d08..2bf3eae7bdf 100644
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -3310,10 +3310,12 @@ merge_face_vectors (f, from, to, cycle_check)
3310 3310
3311 for (i = 1; i < LFACE_VECTOR_SIZE; ++i) 3311 for (i = 1; i < LFACE_VECTOR_SIZE; ++i)
3312 if (!UNSPECIFIEDP (from[i])) 3312 if (!UNSPECIFIEDP (from[i]))
3313 if (i == LFACE_HEIGHT_INDEX && !INTEGERP (from[i])) 3313 {
3314 to[i] = merge_face_heights (from[i], to[i], to[i], cycle_check); 3314 if (i == LFACE_HEIGHT_INDEX && !INTEGERP (from[i]))
3315 else 3315 to[i] = merge_face_heights (from[i], to[i], to[i], cycle_check);
3316 to[i] = from[i]; 3316 else
3317 to[i] = from[i];
3318 }
3317 3319
3318 /* TO is always an absolute face, which should inherit from nothing. 3320 /* TO is always an absolute face, which should inherit from nothing.
3319 We blindly copy the :inherit attribute above and fix it up here. */ 3321 We blindly copy the :inherit attribute above and fix it up here. */
@@ -4185,20 +4187,22 @@ FRAME 0 means change the face on all frames, and change the default
4185 } 4187 }
4186 4188
4187 if (!NILP (param)) 4189 if (!NILP (param))
4188 if (EQ (frame, Qt)) 4190 {
4189 /* Update `default-frame-alist', which is used for new frames. */ 4191 if (EQ (frame, Qt))
4190 { 4192 /* Update `default-frame-alist', which is used for new frames. */
4191 store_in_alist (&Vdefault_frame_alist, param, value); 4193 {
4192 } 4194 store_in_alist (&Vdefault_frame_alist, param, value);
4193 else 4195 }
4194 /* Update the current frame's parameters. */ 4196 else
4195 { 4197 /* Update the current frame's parameters. */
4196 Lisp_Object cons; 4198 {
4197 cons = XCAR (Vparam_value_alist); 4199 Lisp_Object cons;
4198 XSETCAR (cons, param); 4200 cons = XCAR (Vparam_value_alist);
4199 XSETCDR (cons, value); 4201 XSETCAR (cons, param);
4200 Fmodify_frame_parameters (frame, Vparam_value_alist); 4202 XSETCDR (cons, value);
4201 } 4203 Fmodify_frame_parameters (frame, Vparam_value_alist);
4204 }
4205 }
4202 } 4206 }
4203 4207
4204 return face; 4208 return face;