[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Colorizing Emacs
From: |
Kai Großjohann |
Subject: |
Re: Colorizing Emacs |
Date: |
Wed, 05 Mar 2003 09:53:36 +0100 |
User-agent: |
Gnus/5.090016 (Oort Gnus v0.16) Emacs/21.3.50 (gnu/linux) |
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.
Re: Colorizing Emacs, Stein A. Stromme, 2003/03/05
Re: Colorizing Emacs, John Chen, 2003/03/05
Re: Colorizing Emacs, Lucas, 2003/03/05
Re: Colorizing Emacs, Kai Großjohann, 2003/03/05