diff options
| author | Eli Zaretskii | 2018-06-16 13:27:24 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2018-06-16 13:27:24 +0300 |
| commit | 67946b0cde83a66591934a5e1e1c4e8a58c36b4c (patch) | |
| tree | b55bd4a53b96968e48b7f7af35892c1ef1cf05e6 /src | |
| parent | 0a6a2fb1d0b02a5ac442cf6b344e35696aac7eb7 (diff) | |
| download | emacs-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.c | 5 | ||||
| -rw-r--r-- | src/xfaces.c | 12 |
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. |
| 6654 | deemed to match. This variable is intended for use only by code that | 6656 | This variable is intended for use only by code that evaluates |
| 6655 | evaluates the "specifity" of a face specification and should be | 6657 | the "specifity" of a face specification and should be let-bound |
| 6656 | let-bound only for this purpose. */); | 6658 | only 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.) */); |