ελευθερία ϗ ἀλήθεια

Color-theme es un script en elisp que permite la carga de temas para emacs. Color-theme.el carga el fichero color-theme-6.6.0/themes/color-theme-library.el, que es el fichero que contiene los temas que no son mas que pedazos de codigo a modo de funcion unidos en un mismo fichero e interpretados por color-theme.el.

Por lo tanto tendremos que cargar el script color-theme.el y especificar que tema queremos cargar en nuestro .emacs, y del resto ya lo hara nuestro color-theme.el.

Tambien podemos editar el fichero color-theme-library.el y modificar un tema a nuestro gusto, que siempre es una tarea menos compleja que comenzar uno de cero. En cualquier caso pasemos a explicar como instalar y configurar color-theme. Primero debemos descargarlo en la web oficial:

http://www.nongnu.org/color-theme/

Desde dicha web recomiendo usar la version tarball, ya que asi tenemos un control total de donde y como se instalan las cosas, donde descomprimimos, etc:

http://mirrors.aixtools.net/sv/color-theme/

Luego solo debemos descomprimirlo (por ejemplo en nuestro $HOME) mediante:

$ tar xvfz color-theme-6.6.0.tar.gz (o la version que sea)

Una vez hecho esto, no debemos compilar ni instalar (entendiendo por instalar un make install que simplemente copia ciertos ficheros generalmente binarios en directorios del sistema en lugar de directorios locales al usuario).

Una vez hecho esto tan solo debemos anadir a nuestro .emacs las siguientes lineas:

(add-to-list ‘load-path «~/color-theme-6.6.0»)
(require ‘color-theme)
(color-theme-initialize)

Y anadir esta otra para cargar un theme emacs (por ejemplo uno de mis favoritos):

(color-theme-goldenrod)

Para ver la lista de themes podemos e ir probando uno a uno podemos hacer M-x color-theme- y presionamos la tecla TAB, podremos ver un listado de los mismos, sin embargo la carga y recarga de uno y otro tema conlleva la ventaja de que es mas rapido ir probando nuevos temas, pero la desventaja que si un nuevo tema no cambia alguna propiedad de emacs, se quedara con la propiedad antigua, lo que no nos permitira ver totalmente o deformara el tema original.

Aqui dejo para quien quiera descargar mi color-theme basado en goldenrod (tan solo se deben copiar las siguientes lineas en el color-theme-library.el y anadir (color-theme-overdrive) en nuestro .emacs):

(defun color-theme-overdrive ()
«Brown color theme.  Very different from the others.
Supports standard, font-lock and info faces, and it uses
`color-theme-blue-gnus’, `color-theme-blue-erc’ , and
`color-theme-beige-diff’.»
(interactive)
(color-theme-blue-gnus)
(let ((color-theme-is-cumulative t))
(color-theme-blue-erc)
(color-theme-beige-diff)
(color-theme-beige-eshell)
(color-theme-install
‘(color-theme-goldenrod
((background-color . «black»)
(background-mode . dark)
(border-color . «black»)
(cursor-color . «light goldenrod»)
(foreground-color . «goldenrod»)
(mouse-color . «goldenrod»))
((goto-address-mail-face . info-xref)
(list-matching-lines-face . bold)
(view-highlight-face . highlight))
(default ((t (nil))))
(bold ((t (:bold t))))
(bold-italic ((t (:italic t :bold t :foreground «lavender»))))
(font-lock-builtin-face ((t (:foreground «pale goldenrod»))))
(font-lock-comment-face ((t (:foreground «indian red»))))
(font-lock-constant-face ((t (:foreground «pale green»))))
(font-lock-function-name-face ((t (:bold t :foreground «lemon chiffon»))))
(font-lock-keyword-face ((t (:foreground «wheat»))))
(font-lock-string-face ((t (:foreground «gold»))))
(font-lock-type-face ((t (:foreground «dark khaki» :bold t))))
(font-lock-variable-name-face ((t (:bold t :foreground «khaki»))))
(font-lock-warning-face ((t (:bold t :foreground «orange red»))))
(fringe ((t (:background «gray25»))))
(header-line ((t (:background «aliceblue» :foreground «black»))))
(highlight ((t (:background «dark slate blue»))))
(info-menu-5 ((t (:underline t))))
(info-node ((t (:bold t))))
(info-xref ((t (:bold t :foreground «pale goldenrod»))))
(isearch ((t (:background «SeaGreen4» :foreground «black»))))
(isearch-lazy-highlight-face ((t (:background «cyan» :foreground «black»))))
(italic ((t (:italic t :foreground «lavender»))))
(menu ((t (:background «gray25» :foreground «lemon chiffon»))))
(modeline ((t (:background «gray40» :foreground «lemon chiffon» :box (:line-width 1 :style released-button)))))
(modeline-buffer-id ((t (:background «AntiqueWhite4» :foreground «blue»))))
(modeline-mousable ((t (:background «AntiqueWhite4» :foreground «lemon chiffon»))))
(modeline-mousable-minor-mode ((t (:background «wheat» :foreground «lemon chiffon»))))
(mode-line-inactive ((t (:background «gray20» :foreground «lemon chiffon» :box (:line-width 1 :style released-button)))))
(region ((t (:background «red» :foreground «black»))))
(secondary-selection ((t (:background «dark green»))))
(tool-bar ((t (:background «gray25» :foreground «lemon chiffon» :box (:line-width 1 :style released-button)))))
(left-margin ((t (:background «darkblue» :foreground «yellow»))))
(underline ((t (:underline t))))))))

Algunas capturas de pantalla de mi theme:

Tema con codigo fuente buscando cadena con C-s y resaltando las ocurrencias

Tema con codigo empleando resaltado para regiones

Tema resaltando directorios y ficheros en eshell