Encore un thème pour EMACS

Edit

Petit oubli au niveau de la couleur des fonctions. Maintenant corrigé.

Au vu des commentaires de mon dernier billet, j’ai décidé de faire un nouveau thème pour EMACS, cette fois ci dans des tons pastel afin d’être plus doux et reposant pour les séances de codes prolongées.

Alors pour éviter un long discours stérile, voici ce que ça donne:

pastel.png

Et le code qui va bien:

(eval-when-compile
  (require 'color-theme))
(defun color-theme-etenil-pastel () "Etenil's dark side theme." (interactive)
  (color-theme-install
   '(color-theme-etenil-pastel
     ((foreground-color . "#cccccc")
      (background-color . "#111111")
      (background-mode . dark))
     (default ((t (nil))))
     (region ((t (:background "#444" :italic t))))
     (underline ((t (:underline t))))
     (modeline ((t (:foreground "#cccccc" :background "#333"))))
     (modeline-buffer-id ((t (:foreground "#cccccc" :background "#333"))))
     (modeline-mousable ((t (:foreground "#cccccc" :background "#333"))))
     (modeline-mousable-minor-mode ((t (:foreground "white" :background "#333" :bold t))))
     (italic ((t (:italic t))))
     (bold-italic ((t (:bold t :italic t))))
     (font-lock-comment-face ((t (:foreground "#555555"))))
     (font-lock-variable-name-face ((t (:foreground "#6688CC"))))
     (font-lock-string-face ((t (:foreground "#CC6688"))))
     (font-lock-keyword-face ((t (:foreground "#88CC66"))))
     (font-lock-builtin-face ((t (:foreground "#88CC66"))))
     (font-lock-constant-face ((t (:foreground "#CC6666" :bold t))))
     (font-lock-function-name-face ((t (:foreground "#CCCC66" :italic t))))
     (font-lock-type-face ((t (:foreground "#66CCCC" :underline t))))
     ; ERC
     (erc-current-nick-face ((t (:foreground "#CCCC66"))))
     (erc-my-nick-face ((t (:foreground "#CCCC66"))))
     (erc-default-face ((t (:foreground "#CCCCCC"))))
     (erc-keyword-face ((t (:foreground "#88CC66"))))
     (erc-input-face ((t (:foreground "#6688CC"))))
     (erc-notice-face ((t (:foreground "#555"))))
     (erc-timestamp-face ((t (:foreground "#88CC66"))))
     (erc-underline-face ((t (:foreground "c5af75"))))
     (erc-error-face ((t (:foreground "#CC6688"))))
     ; Others...
     (text-cursor ((t (:background "CCCC66" :foreground "#444"))))
     (bold ((t (:bold)))))))

J’attends vos commentaires avec impatience!

Le tout est sous CC-by.

Vus : 938
Publié par Etenil : 58