aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuri Linkov2019-10-19 23:51:03 +0300
committerJuri Linkov2019-10-19 23:51:03 +0300
commit7e238e7d50872d43a137c1350cb3b293aea176c2 (patch)
treec0c419cfd199ecb32956787a252368a6c0fb31cd
parentab7db2814f6bf0a02d533d2cbf1a3d5160a7a007 (diff)
downloademacs-7e238e7d50872d43a137c1350cb3b293aea176c2.tar.gz
emacs-7e238e7d50872d43a137c1350cb3b293aea176c2.zip
Add ':extend t' face attribute to diff faces (bug#37774)
* lisp/vc/diff-mode.el (diff-header, diff-file-header) (diff-removed, diff-added): Add ':extend t' face attribute. * lisp/vc/ediff-init.el (ediff-current-diff-A) (ediff-current-diff-B, ediff-current-diff-C) (ediff-current-diff-Ancestor, ediff-even-diff-A) (ediff-even-diff-B, ediff-even-diff-C, ediff-even-diff-Ancestor) (ediff-odd-diff-A, ediff-odd-diff-B, ediff-odd-diff-C) (ediff-odd-diff-Ancestor): Add ':extend t' face attribute. * lisp/vc/smerge-mode.el (smerge-upper, smerge-lower) (smerge-base, smerge-markers): Add ':extend t' face attribute. * lisp/vc/log-view.el (log-view-file, log-view-message): Add ':extend t' face attribute. * lisp/faces.el (secondary-selection): Add ':extend t' face attribute. (line-number-major-tick, line-number-minor-tick): Change :foreground to :background.
-rw-r--r--etc/NEWS6
-rw-r--r--lisp/faces.el18
-rw-r--r--lisp/vc/diff-mode.el20
-rw-r--r--lisp/vc/ediff-init.el94
-rw-r--r--lisp/vc/log-view.el4
-rw-r--r--lisp/vc/smerge-mode.el16
6 files changed, 79 insertions, 79 deletions
diff --git a/etc/NEWS b/etc/NEWS
index fd46360ed23..6ed3fd46085 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -391,9 +391,9 @@ to 'completion-styles' or 'completion-category-overrides' to use it.
391** New face attribute ':extend' to control face extension at EOL. 391** New face attribute ':extend' to control face extension at EOL.
392The new face attribute ':extend' controls whether to use the face for 392The new face attribute ':extend' controls whether to use the face for
393displaying the empty space beyond end of line (EOL) till the edge of 393displaying the empty space beyond end of line (EOL) till the edge of
394the window. By default, this attribute is non-nil only for 'region' 394the window. By default, this attribute is non-nil only for 'region',
395and 'hl-line' faces; any other face that crosses end of line will not 395'secondary-selection', 'hl-line' and diff faces; any other face that
396affect the display of the empty space at EOL. 396crosses end of line will not affect the display of the empty space at EOL.
397 397
398** Connection-local variables 398** Connection-local variables
399 399
diff --git a/lisp/faces.el b/lisp/faces.el
index 36fc69895dd..2779197804b 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -2365,15 +2365,15 @@ If you set `term-file-prefix' to nil, this function does nothing."
2365 2365
2366(defface secondary-selection 2366(defface secondary-selection
2367 '((((class color) (min-colors 88) (background light)) 2367 '((((class color) (min-colors 88) (background light))
2368 :background "yellow1") 2368 :background "yellow1" :extend t)
2369 (((class color) (min-colors 88) (background dark)) 2369 (((class color) (min-colors 88) (background dark))
2370 :background "SkyBlue4") 2370 :background "SkyBlue4" :extend t)
2371 (((class color) (min-colors 16) (background light)) 2371 (((class color) (min-colors 16) (background light))
2372 :background "yellow") 2372 :background "yellow" :extend t)
2373 (((class color) (min-colors 16) (background dark)) 2373 (((class color) (min-colors 16) (background dark))
2374 :background "SkyBlue4") 2374 :background "SkyBlue4" :extend t)
2375 (((class color) (min-colors 8)) 2375 (((class color) (min-colors 8))
2376 :background "cyan" :foreground "black") 2376 :background "cyan" :foreground "black" :extend t)
2377 (t :inverse-video t)) 2377 (t :inverse-video t))
2378 "Basic face for displaying the secondary selection." 2378 "Basic face for displaying the secondary selection."
2379 :group 'basic-faces) 2379 :group 'basic-faces)
@@ -2419,9 +2419,9 @@ unwanted effects."
2419 2419
2420(defface line-number-major-tick 2420(defface line-number-major-tick
2421 '((((class color grayscale) (background light)) 2421 '((((class color grayscale) (background light))
2422 :foreground "grey55" :bold t) 2422 :background "grey85" :bold t)
2423 (((class color grayscale) (background dark)) 2423 (((class color grayscale) (background dark))
2424 :foreground "grey75" :bold t) 2424 :background "grey75" :bold t)
2425 (t :inherit line-number)) 2425 (t :inherit line-number))
2426 "Face for highlighting \"major ticks\" (as in a ruler). 2426 "Face for highlighting \"major ticks\" (as in a ruler).
2427When `display-line-numbers-major-tick' is positive, highlight 2427When `display-line-numbers-major-tick' is positive, highlight
@@ -2440,9 +2440,9 @@ unwanted effects."
2440 2440
2441(defface line-number-minor-tick 2441(defface line-number-minor-tick
2442 '((((class color grayscale) (background light)) 2442 '((((class color grayscale) (background light))
2443 :foreground "grey65" :bold t) 2443 :background "grey95" :bold t)
2444 (((class color grayscale) (background dark)) 2444 (((class color grayscale) (background dark))
2445 :foreground "grey55" :bold t) 2445 :background "grey55" :bold t)
2446 (t :inherit line-number)) 2446 (t :inherit line-number))
2447 "Face for highlighting \"minor ticks\" (as in a ruler). 2447 "Face for highlighting \"minor ticks\" (as in a ruler).
2448When `display-line-numbers-minor-tick' is positive, highlight 2448When `display-line-numbers-minor-tick' is positive, highlight
diff --git a/lisp/vc/diff-mode.el b/lisp/vc/diff-mode.el
index c86f15cee00..dfac1cca808 100644
--- a/lisp/vc/diff-mode.el
+++ b/lisp/vc/diff-mode.el
@@ -298,9 +298,9 @@ well."
298 298
299(defface diff-header 299(defface diff-header
300 '((((class color) (min-colors 88) (background light)) 300 '((((class color) (min-colors 88) (background light))
301 :background "grey85") 301 :background "grey85" :extend t)
302 (((class color) (min-colors 88) (background dark)) 302 (((class color) (min-colors 88) (background dark))
303 :background "grey45") 303 :background "grey45" :extend t)
304 (((class color)) 304 (((class color))
305 :foreground "blue1" :weight bold) 305 :foreground "blue1" :weight bold)
306 (t :weight bold)) 306 (t :weight bold))
@@ -308,9 +308,9 @@ well."
308 308
309(defface diff-file-header 309(defface diff-file-header
310 '((((class color) (min-colors 88) (background light)) 310 '((((class color) (min-colors 88) (background light))
311 :background "grey75" :weight bold) 311 :background "grey75" :weight bold :extend t)
312 (((class color) (min-colors 88) (background dark)) 312 (((class color) (min-colors 88) (background dark))
313 :background "grey60" :weight bold) 313 :background "grey60" :weight bold :extend t)
314 (((class color)) 314 (((class color))
315 :foreground "cyan" :weight bold) 315 :foreground "cyan" :weight bold)
316 (t :weight bold)) ; :height 1.3 316 (t :weight bold)) ; :height 1.3
@@ -328,11 +328,11 @@ well."
328 '((default 328 '((default
329 :inherit diff-changed) 329 :inherit diff-changed)
330 (((class color) (min-colors 257) (background light)) 330 (((class color) (min-colors 257) (background light))
331 :background "#ffeeee") 331 :background "#ffeeee" :extend t)
332 (((class color) (min-colors 88) (background light)) 332 (((class color) (min-colors 88) (background light))
333 :background "#ffdddd") 333 :background "#ffdddd" :extend t)
334 (((class color) (min-colors 88) (background dark)) 334 (((class color) (min-colors 88) (background dark))
335 :background "#553333") 335 :background "#553333" :extend t)
336 (((class color)) 336 (((class color))
337 :foreground "red")) 337 :foreground "red"))
338 "`diff-mode' face used to highlight removed lines.") 338 "`diff-mode' face used to highlight removed lines.")
@@ -341,11 +341,11 @@ well."
341 '((default 341 '((default
342 :inherit diff-changed) 342 :inherit diff-changed)
343 (((class color) (min-colors 257) (background light)) 343 (((class color) (min-colors 257) (background light))
344 :background "#eeffee") 344 :background "#eeffee" :extend t)
345 (((class color) (min-colors 88) (background light)) 345 (((class color) (min-colors 88) (background light))
346 :background "#ddffdd") 346 :background "#ddffdd" :extend t)
347 (((class color) (min-colors 88) (background dark)) 347 (((class color) (min-colors 88) (background dark))
348 :background "#335533") 348 :background "#335533" :extend t)
349 (((class color)) 349 (((class color))
350 :foreground "green")) 350 :foreground "green"))
351 "`diff-mode' face used to highlight added lines.") 351 "`diff-mode' face used to highlight added lines.")
diff --git a/lisp/vc/ediff-init.el b/lisp/vc/ediff-init.el
index 9e4d08d70c8..ca7f4eb8a22 100644
--- a/lisp/vc/ediff-init.el
+++ b/lisp/vc/ediff-init.el
@@ -806,13 +806,13 @@ to temp files in buffer jobs and when Ediff needs to find fine differences."
806 806
807(defface ediff-current-diff-A 807(defface ediff-current-diff-A
808 '((((class color) (min-colors 88) (background light)) 808 '((((class color) (min-colors 88) (background light))
809 :background "#ffdddd") 809 :background "#ffdddd" :extend t)
810 (((class color) (min-colors 88) (background dark)) 810 (((class color) (min-colors 88) (background dark))
811 :background "#553333") 811 :background "#553333" :extend t)
812 (((class color) (min-colors 16)) 812 (((class color) (min-colors 16))
813 (:foreground "firebrick" :background "pale green")) 813 (:foreground "firebrick" :background "pale green" :extend t))
814 (((class color)) 814 (((class color))
815 (:foreground "blue3" :background "yellow3")) 815 (:foreground "blue3" :background "yellow3" :extend t))
816 (t (:inverse-video t))) 816 (t (:inverse-video t)))
817 "Face for highlighting the selected difference in buffer A." 817 "Face for highlighting the selected difference in buffer A."
818 :group 'ediff-highlighting) 818 :group 'ediff-highlighting)
@@ -827,14 +827,14 @@ this variable represents.")
827 827
828(defface ediff-current-diff-B 828(defface ediff-current-diff-B
829 '((((class color) (min-colors 88) (background light)) 829 '((((class color) (min-colors 88) (background light))
830 :background "#ddffdd") 830 :background "#ddffdd" :extend t)
831 (((class color) (min-colors 88) (background dark)) 831 (((class color) (min-colors 88) (background dark))
832 :background "#335533") 832 :background "#335533" :extend t)
833 (((class color) (min-colors 16)) 833 (((class color) (min-colors 16))
834 (:foreground "DarkOrchid" :background "Yellow")) 834 (:foreground "DarkOrchid" :background "Yellow" :extend t))
835 (((class color)) 835 (((class color))
836 (:foreground "magenta3" :background "yellow3" 836 (:foreground "magenta3" :background "yellow3"
837 :weight bold)) 837 :weight bold :extend t))
838 (t (:inverse-video t))) 838 (t (:inverse-video t)))
839 "Face for highlighting the selected difference in buffer B." 839 "Face for highlighting the selected difference in buffer B."
840 :group 'ediff-highlighting) 840 :group 'ediff-highlighting)
@@ -849,13 +849,13 @@ this variable represents.")
849 849
850(defface ediff-current-diff-C 850(defface ediff-current-diff-C
851 '((((class color) (min-colors 88) (background light)) 851 '((((class color) (min-colors 88) (background light))
852 :background "#ffffaa") 852 :background "#ffffaa" :extend t)
853 (((class color) (min-colors 88) (background dark)) 853 (((class color) (min-colors 88) (background dark))
854 :background "#888833") 854 :background "#888833" :extend t)
855 (((class color) (min-colors 16)) 855 (((class color) (min-colors 16))
856 (:foreground "Navy" :background "Pink")) 856 (:foreground "Navy" :background "Pink" :extend t))
857 (((class color)) 857 (((class color))
858 (:foreground "cyan3" :background "yellow3" :weight bold)) 858 (:foreground "cyan3" :background "yellow3" :weight bold :extend t))
859 (t (:inverse-video t))) 859 (t (:inverse-video t)))
860 "Face for highlighting the selected difference in buffer C." 860 "Face for highlighting the selected difference in buffer C."
861 :group 'ediff-highlighting) 861 :group 'ediff-highlighting)
@@ -870,15 +870,15 @@ this variable represents.")
870 870
871(defface ediff-current-diff-Ancestor 871(defface ediff-current-diff-Ancestor
872 '((((class color) (min-colors 88) (background light)) 872 '((((class color) (min-colors 88) (background light))
873 :background "#cfdeee") 873 :background "#cfdeee" :extend t)
874 (((class color) (min-colors 88) (background dark)) 874 (((class color) (min-colors 88) (background dark))
875 :background "#004151") 875 :background "#004151" :extend t)
876 (((class color) (min-colors 16) (background light)) 876 (((class color) (min-colors 16) (background light))
877 :background "#cfdeee") 877 :background "#cfdeee" :extend t)
878 (((class color) (min-colors 16) (background dark)) 878 (((class color) (min-colors 16) (background dark))
879 :background "#004151") 879 :background "#004151" :extend t)
880 (((class color)) 880 (((class color))
881 (:foreground "black" :background "magenta3")) 881 (:foreground "black" :background "magenta3" :extend t))
882 (t (:inverse-video t))) 882 (t (:inverse-video t)))
883 "Face for highlighting the selected difference in buffer Ancestor." 883 "Face for highlighting the selected difference in buffer Ancestor."
884 :group 'ediff-highlighting) 884 :group 'ediff-highlighting)
@@ -993,14 +993,14 @@ this variable represents.")
993 993
994(defface ediff-even-diff-A 994(defface ediff-even-diff-A
995 `((((type pc)) 995 `((((type pc))
996 (:foreground "green3" :background "light grey")) 996 (:foreground "green3" :background "light grey" :extend t))
997 (((class color) (min-colors 88)) 997 (((class color) (min-colors 88))
998 (:background "light grey")) 998 (:background "light grey" :extend t))
999 (((class color) (min-colors 16)) 999 (((class color) (min-colors 16))
1000 (:foreground "Black" :background "light grey")) 1000 (:foreground "Black" :background "light grey" :extend t))
1001 (((class color)) 1001 (((class color))
1002 (:foreground "red3" :background "light grey" 1002 (:foreground "red3" :background "light grey"
1003 :weight bold)) 1003 :weight bold :extend t))
1004 (t (:italic t :stipple ,stipple-pixmap))) 1004 (t (:italic t :stipple ,stipple-pixmap)))
1005 "Face for highlighting even-numbered non-current differences in buffer A." 1005 "Face for highlighting even-numbered non-current differences in buffer A."
1006 :group 'ediff-highlighting) 1006 :group 'ediff-highlighting)
@@ -1015,11 +1015,11 @@ this variable represents.")
1015 1015
1016(defface ediff-even-diff-B 1016(defface ediff-even-diff-B
1017 `((((class color) (min-colors 88)) 1017 `((((class color) (min-colors 88))
1018 (:background "Grey")) 1018 (:background "Grey" :extend t))
1019 (((class color) (min-colors 16)) 1019 (((class color) (min-colors 16))
1020 (:foreground "White" :background "Grey")) 1020 (:foreground "White" :background "Grey" :extend t))
1021 (((class color)) 1021 (((class color))
1022 (:foreground "blue3" :background "Grey" :weight bold)) 1022 (:foreground "blue3" :background "Grey" :weight bold :extend t))
1023 (t (:italic t :stipple ,stipple-pixmap))) 1023 (t (:italic t :stipple ,stipple-pixmap)))
1024 "Face for highlighting even-numbered non-current differences in buffer B." 1024 "Face for highlighting even-numbered non-current differences in buffer B."
1025 :group 'ediff-highlighting) 1025 :group 'ediff-highlighting)
@@ -1034,14 +1034,14 @@ this variable represents.")
1034 1034
1035(defface ediff-even-diff-C 1035(defface ediff-even-diff-C
1036 `((((type pc)) 1036 `((((type pc))
1037 (:foreground "yellow3" :background "light grey")) 1037 (:foreground "yellow3" :background "light grey" :extend t))
1038 (((class color) (min-colors 88)) 1038 (((class color) (min-colors 88))
1039 (:background "light grey")) 1039 (:background "light grey" :extend t))
1040 (((class color) (min-colors 16)) 1040 (((class color) (min-colors 16))
1041 (:foreground "Black" :background "light grey")) 1041 (:foreground "Black" :background "light grey" :extend t))
1042 (((class color)) 1042 (((class color))
1043 (:foreground "yellow3" :background "light grey" 1043 (:foreground "yellow3" :background "light grey"
1044 :weight bold)) 1044 :weight bold :extend t))
1045 (t (:italic t :stipple ,stipple-pixmap))) 1045 (t (:italic t :stipple ,stipple-pixmap)))
1046 "Face for highlighting even-numbered non-current differences in buffer C." 1046 "Face for highlighting even-numbered non-current differences in buffer C."
1047 :group 'ediff-highlighting) 1047 :group 'ediff-highlighting)
@@ -1056,14 +1056,14 @@ this variable represents.")
1056 1056
1057(defface ediff-even-diff-Ancestor 1057(defface ediff-even-diff-Ancestor
1058 `((((type pc)) 1058 `((((type pc))
1059 (:foreground "cyan3" :background "light grey")) 1059 (:foreground "cyan3" :background "light grey" :extend t))
1060 (((class color) (min-colors 88)) 1060 (((class color) (min-colors 88))
1061 (:background "Grey")) 1061 (:background "Grey" :extend t))
1062 (((class color) (min-colors 16)) 1062 (((class color) (min-colors 16))
1063 (:foreground "White" :background "Grey")) 1063 (:foreground "White" :background "Grey" :extend t))
1064 (((class color)) 1064 (((class color))
1065 (:foreground "cyan3" :background "light grey" 1065 (:foreground "cyan3" :background "light grey"
1066 :weight bold)) 1066 :weight bold :extend t))
1067 (t (:italic t :stipple ,stipple-pixmap))) 1067 (t (:italic t :stipple ,stipple-pixmap)))
1068 "Face for highlighting even-numbered non-current differences in the ancestor buffer." 1068 "Face for highlighting even-numbered non-current differences in the ancestor buffer."
1069 :group 'ediff-highlighting) 1069 :group 'ediff-highlighting)
@@ -1085,13 +1085,13 @@ this variable represents.")
1085 1085
1086(defface ediff-odd-diff-A 1086(defface ediff-odd-diff-A
1087 '((((type pc)) 1087 '((((type pc))
1088 (:foreground "green3" :background "gray40")) 1088 (:foreground "green3" :background "gray40" :extend t))
1089 (((class color) (min-colors 88)) 1089 (((class color) (min-colors 88))
1090 (:background "Grey")) 1090 (:background "Grey" :extend t))
1091 (((class color) (min-colors 16)) 1091 (((class color) (min-colors 16))
1092 (:foreground "White" :background "Grey")) 1092 (:foreground "White" :background "Grey" :extend t))
1093 (((class color)) 1093 (((class color))
1094 (:foreground "red3" :background "black" :weight bold)) 1094 (:foreground "red3" :background "black" :weight bold :extend t))
1095 (t (:italic t :stipple "gray1"))) 1095 (t (:italic t :stipple "gray1")))
1096 "Face for highlighting odd-numbered non-current differences in buffer A." 1096 "Face for highlighting odd-numbered non-current differences in buffer A."
1097 :group 'ediff-highlighting) 1097 :group 'ediff-highlighting)
@@ -1107,13 +1107,13 @@ this variable represents.")
1107 1107
1108(defface ediff-odd-diff-B 1108(defface ediff-odd-diff-B
1109 '((((type pc)) 1109 '((((type pc))
1110 (:foreground "White" :background "gray40")) 1110 (:foreground "White" :background "gray40" :extend t))
1111 (((class color) (min-colors 88)) 1111 (((class color) (min-colors 88))
1112 (:background "light grey")) 1112 (:background "light grey" :extend t))
1113 (((class color) (min-colors 16)) 1113 (((class color) (min-colors 16))
1114 (:foreground "Black" :background "light grey")) 1114 (:foreground "Black" :background "light grey" :extend t))
1115 (((class color)) 1115 (((class color))
1116 (:foreground "cyan3" :background "black" :weight bold)) 1116 (:foreground "cyan3" :background "black" :weight bold :extend t))
1117 (t (:italic t :stipple "gray1"))) 1117 (t (:italic t :stipple "gray1")))
1118 "Face for highlighting odd-numbered non-current differences in buffer B." 1118 "Face for highlighting odd-numbered non-current differences in buffer B."
1119 :group 'ediff-highlighting) 1119 :group 'ediff-highlighting)
@@ -1128,13 +1128,13 @@ this variable represents.")
1128 1128
1129(defface ediff-odd-diff-C 1129(defface ediff-odd-diff-C
1130 '((((type pc)) 1130 '((((type pc))
1131 (:foreground "yellow3" :background "gray40")) 1131 (:foreground "yellow3" :background "gray40" :extend t))
1132 (((class color) (min-colors 88)) 1132 (((class color) (min-colors 88))
1133 (:background "Grey")) 1133 (:background "Grey" :extend t))
1134 (((class color) (min-colors 16)) 1134 (((class color) (min-colors 16))
1135 (:foreground "White" :background "Grey")) 1135 (:foreground "White" :background "Grey" :extend t))
1136 (((class color)) 1136 (((class color))
1137 (:foreground "yellow3" :background "black" :weight bold)) 1137 (:foreground "yellow3" :background "black" :weight bold :extend t))
1138 (t (:italic t :stipple "gray1"))) 1138 (t (:italic t :stipple "gray1")))
1139 "Face for highlighting odd-numbered non-current differences in buffer C." 1139 "Face for highlighting odd-numbered non-current differences in buffer C."
1140 :group 'ediff-highlighting) 1140 :group 'ediff-highlighting)
@@ -1149,11 +1149,11 @@ this variable represents.")
1149 1149
1150(defface ediff-odd-diff-Ancestor 1150(defface ediff-odd-diff-Ancestor
1151 '((((class color) (min-colors 88)) 1151 '((((class color) (min-colors 88))
1152 (:background "gray40")) 1152 (:background "gray40" :extend t))
1153 (((class color) (min-colors 16)) 1153 (((class color) (min-colors 16))
1154 (:foreground "cyan3" :background "gray40")) 1154 (:foreground "cyan3" :background "gray40" :extend t))
1155 (((class color)) 1155 (((class color))
1156 (:foreground "green3" :background "black" :weight bold)) 1156 (:foreground "green3" :background "black" :weight bold :extend t))
1157 (t (:italic t :stipple "gray1"))) 1157 (t (:italic t :stipple "gray1")))
1158 "Face for highlighting odd-numbered non-current differences in the ancestor buffer." 1158 "Face for highlighting odd-numbered non-current differences in the ancestor buffer."
1159 :group 'ediff-highlighting) 1159 :group 'ediff-highlighting)
diff --git a/lisp/vc/log-view.el b/lisp/vc/log-view.el
index 3389264ce6e..054c2b91340 100644
--- a/lisp/vc/log-view.el
+++ b/lisp/vc/log-view.el
@@ -196,14 +196,14 @@ If it is nil, `log-view-toggle-entry-display' does nothing.")
196 196
197(defface log-view-file 197(defface log-view-file
198 '((((class color) (background light)) 198 '((((class color) (background light))
199 (:background "grey70" :weight bold)) 199 (:background "grey70" :weight bold :extend t))
200 (t (:weight bold))) 200 (t (:weight bold)))
201 "Face for the file header line in `log-view-mode'." 201 "Face for the file header line in `log-view-mode'."
202 :group 'log-view) 202 :group 'log-view)
203 203
204(defface log-view-message 204(defface log-view-message
205 '((((class color) (background light)) 205 '((((class color) (background light))
206 (:background "grey85")) 206 (:background "grey85" :extend t))
207 (t (:weight bold))) 207 (t (:weight bold)))
208 "Face for the message header line in `log-view-mode'." 208 "Face for the message header line in `log-view-mode'."
209 :group 'log-view) 209 :group 'log-view)
diff --git a/lisp/vc/smerge-mode.el b/lisp/vc/smerge-mode.el
index f032b084167..6d2d3f8d42f 100644
--- a/lisp/vc/smerge-mode.el
+++ b/lisp/vc/smerge-mode.el
@@ -77,9 +77,9 @@ Used in `smerge-diff-base-upper' and related functions."
77 77
78(defface smerge-upper 78(defface smerge-upper
79 '((((class color) (min-colors 88) (background light)) 79 '((((class color) (min-colors 88) (background light))
80 :background "#ffdddd") 80 :background "#ffdddd" :extend t)
81 (((class color) (min-colors 88) (background dark)) 81 (((class color) (min-colors 88) (background dark))
82 :background "#553333") 82 :background "#553333" :extend t)
83 (((class color)) 83 (((class color))
84 :foreground "red")) 84 :foreground "red"))
85 "Face for the `upper' version of a conflict.") 85 "Face for the `upper' version of a conflict.")
@@ -88,9 +88,9 @@ Used in `smerge-diff-base-upper' and related functions."
88 88
89(defface smerge-lower 89(defface smerge-lower
90 '((((class color) (min-colors 88) (background light)) 90 '((((class color) (min-colors 88) (background light))
91 :background "#ddffdd") 91 :background "#ddffdd" :extend t)
92 (((class color) (min-colors 88) (background dark)) 92 (((class color) (min-colors 88) (background dark))
93 :background "#335533") 93 :background "#335533" :extend t)
94 (((class color)) 94 (((class color))
95 :foreground "green")) 95 :foreground "green"))
96 "Face for the `lower' version of a conflict.") 96 "Face for the `lower' version of a conflict.")
@@ -99,9 +99,9 @@ Used in `smerge-diff-base-upper' and related functions."
99 99
100(defface smerge-base 100(defface smerge-base
101 '((((class color) (min-colors 88) (background light)) 101 '((((class color) (min-colors 88) (background light))
102 :background "#ffffaa") 102 :background "#ffffaa" :extend t)
103 (((class color) (min-colors 88) (background dark)) 103 (((class color) (min-colors 88) (background dark))
104 :background "#888833") 104 :background "#888833" :extend t)
105 (((class color)) 105 (((class color))
106 :foreground "yellow")) 106 :foreground "yellow"))
107 "Face for the base code.") 107 "Face for the base code.")
@@ -109,9 +109,9 @@ Used in `smerge-diff-base-upper' and related functions."
109 109
110(defface smerge-markers 110(defface smerge-markers
111 '((((background light)) 111 '((((background light))
112 (:background "grey85")) 112 (:background "grey85" :extend t))
113 (((background dark)) 113 (((background dark))
114 (:background "grey30"))) 114 (:background "grey30" :extend t)))
115 "Face for the conflict markers.") 115 "Face for the conflict markers.")
116(defvar smerge-markers-face 'smerge-markers) 116(defvar smerge-markers-face 'smerge-markers)
117 117