Re: Colorizing Emacs

[Kai Großjohann]

Lucas <bonnet.lucas@wanadoo.fr> writes:

> BTW, I have to say that I'm curious to know what are *your* colors ?
> Would you mind posting your config' ? :)

Hm.  Lessee now...

~/.Xresources has this:

#define KAIFG black
#define KAIBG gainsboro
#define KAIBG_ALT grey
#define KAIBG_HILITE ghostwhite

*Foreground:            KAIFG
*Background:            KAIBG
Emacs*background:       KAIBG

Emacs*pointerColor:             KAIFG
Emacs.pane.menubar.background:          KAIBG_ALT
Emacs.pane.menubar.buttonForeground:    red
Emacs.pane.menubar.buttonBackground:    green
Emacs.pane.menubar.font:                KAIFONT_SMALL
Emacs.menu*.font:                       KAIFONT_SMALL
Emacs.menu*.background:                 KAIBG_ALT
Emacs.fringe.attributeBackground:       KAIBG_ALT

And ~/.emacs has this:

  (set-mouse-color "black")
  (eval-after-load "custom"
    '(progn
       (set-face-bold-p 'custom-button-face t)))
  ;; if font has no italic, use color
  (unless (condition-case nil
              (x-resolve-font-name
               (x-make-font-italic (x-get-resource "emacs" "font")))
            (error nil))
    (mapcar (lambda (f)
              (when (face-italic-p f)
                (set-face-foreground f "seagreen")))
            (face-list)))

    (set-face-background 'highlight "lightsteelblue")
    (set-face-background 'region "ghostwhite")
    (eval-after-load "wid-edit"
      '(progn
         (set-face-background 'widget-field-face "ghostwhite")))
    (eval-after-load "xslide-font"
      '(progn
         (set-face-foreground 'xsl-fo-alternate-face "seagreen")))

And then there is some stuff in ~/.gnus:

  (set-face-foreground 'gnus-header-content-face "indianred4")
  (set-face-foreground 'gnus-header-newsgroups-face "midnightblue")

Does this help?
-- 
A preposition is not a good thing to end a sentence with.