aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorEli Zaretskii2018-06-16 13:27:24 +0300
committerEli Zaretskii2018-06-16 13:27:24 +0300
commit67946b0cde83a66591934a5e1e1c4e8a58c36b4c (patch)
treeb55bd4a53b96968e48b7f7af35892c1ef1cf05e6 /src
parent0a6a2fb1d0b02a5ac442cf6b344e35696aac7eb7 (diff)
downloademacs-67946b0cde83a66591934a5e1e1c4e8a58c36b4c.tar.gz
emacs-67946b0cde83a66591934a5e1e1c4e8a58c36b4c.zip
Formatting and doc fixes in recent changes
* src/xfaces.c (evaluate_face_filter): Explain the inner braces. (merge_face_ref): Fix whitespace. (syms_of_xfaces) <face-filters-always-match>: Doc fix. * src/xdisp.c (extend_face_to_end_of_line): Fix whitespace.
Diffstat (limited to 'src')
-rw-r--r--src/xdisp.c5
-rw-r--r--src/xfaces.c12
2 files changed, 9 insertions, 8 deletions
diff --git a/src/xdisp.c b/src/xdisp.c
index a2b6513e571..dcb002055b4 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -20231,9 +20231,8 @@ extend_face_to_end_of_line (struct it *it)
20231 return; 20231 return;
20232 20232
20233 /* The default face, possibly remapped. */ 20233 /* The default face, possibly remapped. */
20234 default_face = FACE_FROM_ID_OR_NULL ( 20234 default_face =
20235 f, 20235 FACE_FROM_ID_OR_NULL (f, lookup_basic_face (it->w, f, DEFAULT_FACE_ID));
20236 lookup_basic_face (it->w, f, DEFAULT_FACE_ID));
20237 20236
20238 /* Face extension extends the background and box of IT->face_id 20237 /* Face extension extends the background and box of IT->face_id
20239 to the end of the line. If the background equals the background 20238 to the end of the line. If the background equals the background
diff --git a/src/xfaces.c b/src/xfaces.c
index 31aa14b7102..eea06724185 100644
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -2203,6 +2203,8 @@ evaluate_face_filter (Lisp_Object filter, struct window *w,
2203{ 2203{
2204 Lisp_Object orig_filter = filter; 2204 Lisp_Object orig_filter = filter;
2205 2205
2206 /* Inner braces keep compiler happy about the goto skipping variable
2207 initialization. */
2206 { 2208 {
2207 if (NILP (filter)) 2209 if (NILP (filter))
2208 return true; 2210 return true;
@@ -2356,7 +2358,7 @@ merge_face_ref (struct window *w,
2356 Lisp_Object first = XCAR (face_ref); 2358 Lisp_Object first = XCAR (face_ref);
2357 2359
2358 if (EQ (first, Qforeground_color) 2360 if (EQ (first, Qforeground_color)
2359 || EQ (first, Qbackground_color)) 2361 || EQ (first, Qbackground_color))
2360 { 2362 {
2361 /* One of (FOREGROUND-COLOR . COLOR) or (BACKGROUND-COLOR 2363 /* One of (FOREGROUND-COLOR . COLOR) or (BACKGROUND-COLOR
2362 . COLOR). COLOR must be a string. */ 2364 . COLOR). COLOR must be a string. */
@@ -6650,10 +6652,10 @@ syms_of_xfaces (void)
6650#endif 6652#endif
6651 6653
6652 DEFVAR_BOOL ("face-filters-always-match", face_filters_always_match, 6654 DEFVAR_BOOL ("face-filters-always-match", face_filters_always_match,
6653 doc: /* Non-nil means that face filters are always 6655 doc: /* Non-nil means that face filters are always deemed to match.
6654deemed to match. This variable is intended for use only by code that 6656This variable is intended for use only by code that evaluates
6655evaluates the "specifity" of a face specification and should be 6657the "specifity" of a face specification and should be let-bound
6656let-bound only for this purpose. */); 6658only for this purpose. */);
6657 6659
6658 DEFVAR_LISP ("face-new-frame-defaults", Vface_new_frame_defaults, 6660 DEFVAR_LISP ("face-new-frame-defaults", Vface_new_frame_defaults,
6659 doc: /* List of global face definitions (for internal use only.) */); 6661 doc: /* List of global face definitions (for internal use only.) */);