+(when window-system
+ ;; (setq
+ ;; display-time-use-mail-icon t)
+
+ (ff/configure-faces
+ '(
+ ;; (escape-glyph :foreground "#c0c0c0" :weight 'bold)
+ (escape-glyph :foreground "green3" :weight 'bold)
+ (default :background "gray90" :foreground "black")
+ (cperl-array-face :background "gray90" :foreground "blue" :weight 'bold)
+ (cperl-hash-face :background "gray90" :foreground "purple" :weight 'bold)
+ (message-cited-text :foreground "red4")
+ (diff-mode :background "gray90" :weight 'bold)
+ (diff-added :background "gray90" :foreground "green4" :weight 'bold)
+ (diff-removed :background "gray90" :foreground "red2" :weight 'bold)
+ (diff-changed :background "gray90" :foreground "blue" :weight 'bold)
+ (diff-file-header :background "white" :foreground "black"
+ :weight 'bold)
+ (diff-header :background "white" :foreground "black")
+ (diff-hunk-header :background "white" :foreground "black")
+ (font-lock-builtin-face :foreground "deeppink3")
+ (font-lock-string-face :foreground "dark olive green")
+ (font-lock-variable-name-face :foreground "sienna")
+ ;; (font-lock-function-name-face :foreground "blue" :weight 'bold)
+ (font-lock-function-name-face :foreground "blue")
+ ;; (font-lock-comment-delimiter-face :foreground "dark violet")
+ ;; (font-lock-comment-face :foreground "dark violet")
+ (flyspell-incorrect :background "#ff0000" :foreground "black")
+ (flyspell-duplicate :background "#ff9000" :foreground "black")
+ (hl-line :background "white")
+ (sh-heredoc :foreground "black" :background "#fff0f0")
+ (sh-heredoc-face :foreground "black" :background "#fff0f0")
+ (header-line :background "gray65")
+ (highlight :background "turquoise")
+ (message-cited-text-face :foreground "firebrick")
+ (isearch :background "yellow" :foreground "black")
+ (isearch-lazy-highlight-face' :background "yellow3" :foreground "black")
+ (region :background "#b8b8e0" :foreground "black")
+ ;; (region :background "plum" :foreground "black")
+ (show-paren-match-face :background "gold" :foreground "black")
+ (show-paren-mismatch-face :background "red" :foreground "black")
+ (trailing-whitespace :background "gray65")
+ (cursor :inverse-video t)
+ (enotes/list-title-face :foreground "blue" :weight 'bold)
+ (mode-line :background "#b0b0ff" :foreground "black" :box nil
+ :inverse-video nil)
+ (header-line :background "cornflowerblue" :foreground "black" :box nil
+ :inverse-video nil)
+ (mode-line-inactive :background "gray80" :foreground "black" :box nil
+ :inverse-video nil)
+ ;; (fringe :background "black" :foreground "gray90")
+ (fringe :background "gray80")
+ (ff/date-info-face :foreground "white")
+ (ff/battery-info-face :foreground "white")
+ (ff/mail-alarm-face :foreground "white" :background "red2")
+ ;; (alarm-vc-face :foreground "black" :background "yellow" :weight 'normal)
+ (gui-button-face :background "green" :foreground "black")
+ ))
+ )
+