Re: Colorizing Emacs

[Lucas]

Un beau jour, kai.grossjohann@uni-duisburg.de (Kai Großjohann) nous a dit:

> Hm.  Lessee now...
>
> ~/.Xresources has this:
>
> #define KAIFG black
> #define KAIBG gainsboro
Not so bad, I'll test for a few.

> #define KAIBG_ALT grey
Too sad :)

> #define KAIBG_HILITE ghostwhite
Highlight ? Highlight what ? :)
Is there a way do define it in .emacs ?

[...]

> Emacs*pointerColor:             KAIFG
No way to do that on XP, bloody OS.

> Emacs.pane.menubar.background:          KAIBG_ALT
> Emacs.pane.menubar.buttonForeground:    red
> Emacs.pane.menubar.buttonBackground:    green
[...]

Fruit Salad :) And still no way to do that *easily* on XP...

> Emacs.fringe.attributeBackground:       KAIBG_ALT

fringe ? You even set the border colour ? :)

> And ~/.emacs has this:
>
>   (set-mouse-color "black")
>   (eval-after-load "custom"
>     '(progn
>        (set-face-bold-p 'custom-button-face t)))
Face not found :(

>   ;; if font has no italic, use color
>   (unless (condition-case nil
>               (x-resolve-font-name
>                (x-make-font-italic (x-get-resource "emacs" "font")))
My Emacs tells that x-make-font-italic is obsolete, but I'm sure you've
got a good reason to keep using it :)

[...]

Nice colours too :)

>
> And then there is some stuff in ~/.gnus:
>
>   (set-face-foreground 'gnus-header-content-face "indianred4")
>   (set-face-foreground 'gnus-header-newsgroups-face "midnightblue")

I've much more colours, here's mine :

   (set-face-foreground 'gnus-summary-normal-read-face "blue")
   (set-face-foreground 'gnus-signature-face "purple4")
   (copy-face 'default 'gnus-cite-face-1)
   (set-face-foreground 'gnus-cite-face-1 "ligh slate gray")
   (copy-face 'default 'gnus-cite-face-2)
   (set-face-foreground 'gnus-cite-face-2 "sea green")
   (copy-face 'default 'gnus-cite-face-3)
   (set-face-foreground 'gnus-cite-face-3 "RosyBrown4")
   (copy-face 'default 'gnus-header-content-face)
   (set-face-foreground 'gnus-header-content-face "DeepPink1")
   (copy-face 'default 'gnus-header-from-face)
   (set-face-foreground 'gnus-header-from-face "olive drab")
   (copy-face 'default 'gnus-header-name-face)
   (set-face-foreground 'gnus-header-name-face "orchid")
   (copy-face 'italic 'gnus-header-subject-face)
   (set-face-foreground 'gnus-header-subject-face "lightcoral")
   (copy-face 'italic 'gnus-cite-attribution-face)
   (set-face-foreground 'gnus-cite-attribution-face "tan")
   (copy-face 'bold 'gnus-emphasis-bold)
   (set-face-foreground 'gnus-emphasis-bold "medium blue")
   (set-face-foreground 'message-header-other-face "pale violet red")
   (set-face-foreground 'message-cited-text-face "midnight blue")
   (copy-face 'bold 'gnus-group-news-3-face)
   (set-face-foreground 'gnus-group-news-3-face "LightBlue4")
   (set-face-foreground 'gnus-group-news-3-empty-face "SpringGreen4")
   (copy-face 'bold 'gnus-group-mail-3-face)
   (set-face-foreground 'gnus-group-mail-3-face "medium purple")
   (copy-face 'default 'gnus-group-mail-3-empty-face)
   (set-face-foreground 'gnus-group-mail-3-empty-face "khaki4")
   (set-face-foreground 'gnus-cite-face-1 "blue violet")

I really enjoy whene there's tons of colour everywhere, as you can see
> Does this help?

Yes, sure, thanks. I still need to learn Elisp :)

-- 
Lucas, fruit salad fan