diff options
Diffstat (limited to 'lisp/font-lock.el')
| -rw-r--r-- | lisp/font-lock.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/font-lock.el b/lisp/font-lock.el index d2dd20ab028..f451d3aecfa 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el @@ -275,21 +275,21 @@ See `font-lock-make-face' and `list-faces-display'." grayshade greyshade)) (list (list 'font-lock-comment-face - (if light-bg "DimGray" "Gray80") nil t t nil) + nil (if light-bg "Gray80" "DimGray") t t nil) (list 'font-lock-string-face - (if light-bg "Gray50" "LightGray") nil nil t nil) + nil (if light-bg "Gray50" "LightGray") nil t nil) (list 'font-lock-keyword-face - (if light-bg "DimGray" "Gray90") nil t nil nil) + nil (if light-bg "Gray90" "DimGray") t nil nil) (list 'font-lock-function-name-face (cdr (assq 'background-color (frame-parameters))) (cdr (assq 'foreground-color (frame-parameters))) t nil nil) (list 'font-lock-variable-name-face - (if light-bg "DimGray" "Gray90") nil t t nil) + nil (if light-bg "Gray90" "DimGray") t t nil) (list 'font-lock-type-face - (if light-bg "DimGray" "Gray80") nil t nil t) + nil (if light-bg "Gray80" "DimGray") t nil t) (list 'font-lock-reference-face - (if light-bg "Gray50" "LightGray") nil t nil t))) + nil (if light-bg "LightGray" "Gray50") t nil t))) (light-bg ; light colour background '((font-lock-comment-face "Firebrick") (font-lock-string-face "RosyBrown") |