M-x color-theme-select して Color Themes メジャーモードのバッファへ入ってるときに p を押すと color-theme-print 関数が呼ばれて別のバッファに (defun my-color-theme() ... ) な形式で、いまカーソルがあったテーマを適用させる emacs lisp コードが書き出される。これをもとにして好きにカスタマイズしろ、ということかな。
それにしても color-theme あんまり気に入るのがない。。 emacs でプログラム書く人はシンタックスハイライトなんて軟弱なものにはあんまり興味ないんだろうか。僕はこういうのをいじりはじめると延々とやってしまう・・・。 Terminal.app の ANSI カラーのカスタマイズとかも。