1485 |
(defface custom-invalid-face '((((class color)) |
(defface custom-invalid-face '((((class color)) |
1486 |
(:foreground "yellow" :background "red")) |
(:foreground "yellow" :background "red")) |
1487 |
(t |
(t |
1488 |
(:bold t :italic t :underline t))) |
(:weight bold :slant italic :underline t))) |
1489 |
"Face used when the customize item is invalid." |
"Face used when the customize item is invalid." |
1490 |
:group 'custom-magic-faces) |
:group 'custom-magic-faces) |
1491 |
|
|
1499 |
(defface custom-modified-face '((((class color)) |
(defface custom-modified-face '((((class color)) |
1500 |
(:foreground "white" :background "blue")) |
(:foreground "white" :background "blue")) |
1501 |
(t |
(t |
1502 |
(:italic t :bold))) |
(:slant italic :bold))) |
1503 |
"Face used when the customize item has been modified." |
"Face used when the customize item has been modified." |
1504 |
:group 'custom-magic-faces) |
:group 'custom-magic-faces) |
1505 |
|
|
1506 |
(defface custom-set-face '((((class color)) |
(defface custom-set-face '((((class color)) |
1507 |
(:foreground "blue" :background "white")) |
(:foreground "blue" :background "white")) |
1508 |
(t |
(t |
1509 |
(:italic t))) |
(:slant italic))) |
1510 |
"Face used when the customize item has been set." |
"Face used when the customize item has been set." |
1511 |
:group 'custom-magic-faces) |
:group 'custom-magic-faces) |
1512 |
|
|
1513 |
(defface custom-changed-face '((((class color)) |
(defface custom-changed-face '((((class color)) |
1514 |
(:foreground "white" :background "blue")) |
(:foreground "white" :background "blue")) |
1515 |
(t |
(t |
1516 |
(:italic t))) |
(:slant italic))) |
1517 |
"Face used when the customize item has been changed." |
"Face used when the customize item has been changed." |
1518 |
:group 'custom-magic-faces) |
:group 'custom-magic-faces) |
1519 |
|
|
1958 |
(background dark)) |
(background dark)) |
1959 |
(:background "dim gray")) |
(:background "dim gray")) |
1960 |
(t |
(t |
1961 |
(:italic t))) |
(:slant italic))) |
1962 |
"Face used for comments on variables or faces" |
"Face used for comments on variables or faces" |
1963 |
:version "21.1" |
:version "21.1" |
1964 |
:group 'custom-faces) |
:group 'custom-faces) |
1968 |
'((((class color) (background dark)) (:foreground "gray80")) |
'((((class color) (background dark)) (:foreground "gray80")) |
1969 |
(((class color) (background light)) (:foreground "blue4")) |
(((class color) (background light)) (:foreground "blue4")) |
1970 |
(((class grayscale) (background light)) |
(((class grayscale) (background light)) |
1971 |
(:foreground "DimGray" :bold t :italic t)) |
(:foreground "DimGray" :weight bold :slant italic)) |
1972 |
(((class grayscale) (background dark)) |
(((class grayscale) (background dark)) |
1973 |
(:foreground "LightGray" :bold t :italic t)) |
(:foreground "LightGray" :weight bold :slant italic)) |
1974 |
(t (:bold t))) |
(t (:weight bold))) |
1975 |
"Face used for variables or faces comment tags" |
"Face used for variables or faces comment tags" |
1976 |
:group 'custom-faces) |
:group 'custom-faces) |
1977 |
|
|
2016 |
(defface custom-variable-tag-face |
(defface custom-variable-tag-face |
2017 |
`((((class color) |
`((((class color) |
2018 |
(background dark)) |
(background dark)) |
2019 |
(:foreground "light blue" :bold t :height 1.2 :inherit variable-pitch)) |
(:foreground "light blue" :weight bold :height 1.2 :inherit variable-pitch)) |
2020 |
(((class color) |
(((class color) |
2021 |
(background light)) |
(background light)) |
2022 |
(:foreground "blue" :bold t :height 1.2 :inherit variable-pitch)) |
(:foreground "blue" :weight bold :height 1.2 :inherit variable-pitch)) |
2023 |
(t (:bold t))) |
(t (:weight bold))) |
2024 |
"Face used for unpushable variable tags." |
"Face used for unpushable variable tags." |
2025 |
:group 'custom-faces) |
:group 'custom-faces) |
2026 |
|
|
2027 |
(defface custom-variable-button-face '((t (:underline t :bold t))) |
(defface custom-variable-button-face '((t (:underline t :weight bold))) |
2028 |
"Face used for pushable variable tags." |
"Face used for pushable variable tags." |
2029 |
:group 'custom-faces) |
:group 'custom-faces) |
2030 |
|
|
2476 |
"Ignoring WIDGET, convert :bold and :italic in VALUE to new form." |
"Ignoring WIDGET, convert :bold and :italic in VALUE to new form." |
2477 |
(let (result) |
(let (result) |
2478 |
(while value |
(while value |
|
(assert (cdr value)) |
|
2479 |
(let ((key (car value)) |
(let ((key (car value)) |
2480 |
(val (car (cdr value)))) |
(val (car (cdr value)))) |
2481 |
(cond ((eq key :italic) |
(cond ((eq key :italic) |
2631 |
;;; The `custom-face' Widget. |
;;; The `custom-face' Widget. |
2632 |
|
|
2633 |
(defface custom-face-tag-face |
(defface custom-face-tag-face |
2634 |
`((t (:bold t :height 1.2 :inherit variable-pitch))) |
`((t (:weight bold :height 1.2 :inherit variable-pitch))) |
2635 |
"Face used for face tags." |
"Face used for face tags." |
2636 |
:group 'custom-faces) |
:group 'custom-faces) |
2637 |
|
|
3139 |
(defface custom-group-tag-face-1 |
(defface custom-group-tag-face-1 |
3140 |
`((((class color) |
`((((class color) |
3141 |
(background dark)) |
(background dark)) |
3142 |
(:foreground "pink" :bold t :height 1.2 :inherit variable-pitch)) |
(:foreground "pink" :weight bold :height 1.2 :inherit variable-pitch)) |
3143 |
(((class color) |
(((class color) |
3144 |
(background light)) |
(background light)) |
3145 |
(:foreground "red" :bold t :height 1.2 :inherit variable-pitch)) |
(:foreground "red" :weight bold :height 1.2 :inherit variable-pitch)) |
3146 |
(t (:bold t))) |
(t (:weight bold))) |
3147 |
"Face used for group tags." |
"Face used for group tags." |
3148 |
:group 'custom-faces) |
:group 'custom-faces) |
3149 |
|
|
3150 |
(defface custom-group-tag-face |
(defface custom-group-tag-face |
3151 |
`((((class color) |
`((((class color) |
3152 |
(background dark)) |
(background dark)) |
3153 |
(:foreground "light blue" :bold t :height 1.2)) |
(:foreground "light blue" :weight bold :height 1.2)) |
3154 |
(((class color) |
(((class color) |
3155 |
(background light)) |
(background light)) |
3156 |
(:foreground "blue" :bold t :height 1.2)) |
(:foreground "blue" :weight bold :height 1.2)) |
3157 |
(t (:bold t))) |
(t (:weight bold))) |
3158 |
"Face used for low level group tags." |
"Face used for low level group tags." |
3159 |
:group 'custom-faces) |
:group 'custom-faces) |
3160 |
|
|