#+TITLE: Color Theme Switcher #+DATE: <2021-03-21 Sun> #+AUTHOR: Adolfo Villafiorita This Org Mode file allows you to switch color theme. #+begin_src emacs-lisp :results output raw (setq all-themes '(aalto-dark aalto-light aliceblue andreas arjen beige-diff beige-eshell bharadwaj-slate bharadwaj billw black-on-gray blippblopp blue-erc blue-eshell blue-gnus blue-mood blue-sea calm-forest charcoal-black clarity classic cobalt comidia dark-blue dark-blue2 dark-erc dark-font-lock dark-gnus dark-green dark-info dark-laptop deep-blue desert digital-ofs1 emacs-21 emacs-nw euphoria feng-shui fischmeister gnome gnome2 goldenrod gray1 gray30 greiner gtk-ide high-contrast hober infodoc jb-simple jedit-grey jonadabian-slate jonadabian jsc-dark jsc-light jsc-light2 katester kingsajz late-night lawrence ld-dark lethe marine marquardt matrix midnight mistyday montz oswald parus pierson pok-wob pok-wog ramangalahy raspopovic renegade resolve retro-green retro-orange robin-hood rotor ryerson salmon-diff salmon-font-lock scintilla shaman simple-1 sitaramv-nt sitaramv-solaris snow snowish standard-ediff standard subtle-blue subtle-hacker taming-mr-arneson taylor tty-dark vim-colors whateveryouwant wheat word-perfect xemacs xp julie subdued railscast )) (mapcar (lambda (x) (load-theme x t t)) all-themes) (defun color-theme-preview () "Go to the GitHub repository and preview themes" (interactive) (eww "https://github.com/emacs-jp/replace-colorthemes/blob/master/screenshots.md")) (dolist (theme all-themes) (progn (princ (format "- [[elisp:(switch-to-theme '%s)][Set %s]]\n" theme theme)))) (defun switch-to-theme (theme) (interactive) (dolist (theme custom-enabled-themes) (disable-theme theme)) (enable-theme theme)) #+end_src #+RESULTS: - [[elisp:(switch-to-theme 'aalto-dark)][Set aalto-dark]] - [[elisp:(switch-to-theme 'aalto-light)][Set aalto-light]] - [[elisp:(switch-to-theme 'aliceblue)][Set aliceblue]] - [[elisp:(switch-to-theme 'andreas)][Set andreas]] - [[elisp:(switch-to-theme 'arjen)][Set arjen]] - [[elisp:(switch-to-theme 'beige-diff)][Set beige-diff]] - [[elisp:(switch-to-theme 'beige-eshell)][Set beige-eshell]] - [[elisp:(switch-to-theme 'bharadwaj-slate)][Set bharadwaj-slate]] - [[elisp:(switch-to-theme 'bharadwaj)][Set bharadwaj]] - [[elisp:(switch-to-theme 'billw)][Set billw]] - [[elisp:(switch-to-theme 'black-on-gray)][Set black-on-gray]] - [[elisp:(switch-to-theme 'blippblopp)][Set blippblopp]] - [[elisp:(switch-to-theme 'blue-erc)][Set blue-erc]] - [[elisp:(switch-to-theme 'blue-eshell)][Set blue-eshell]] - [[elisp:(switch-to-theme 'blue-gnus)][Set blue-gnus]] - [[elisp:(switch-to-theme 'blue-mood)][Set blue-mood]] - [[elisp:(switch-to-theme 'blue-sea)][Set blue-sea]] - [[elisp:(switch-to-theme 'calm-forest)][Set calm-forest]] - [[elisp:(switch-to-theme 'charcoal-black)][Set charcoal-black]] - [[elisp:(switch-to-theme 'clarity)][Set clarity]] - [[elisp:(switch-to-theme 'classic)][Set classic]] - [[elisp:(switch-to-theme 'cobalt)][Set cobalt]] - [[elisp:(switch-to-theme 'comidia)][Set comidia]] - [[elisp:(switch-to-theme 'dark-blue)][Set dark-blue]] - [[elisp:(switch-to-theme 'dark-blue2)][Set dark-blue2]] - [[elisp:(switch-to-theme 'dark-erc)][Set dark-erc]] - [[elisp:(switch-to-theme 'dark-font-lock)][Set dark-font-lock]] - [[elisp:(switch-to-theme 'dark-gnus)][Set dark-gnus]] - [[elisp:(switch-to-theme 'dark-green)][Set dark-green]] - [[elisp:(switch-to-theme 'dark-info)][Set dark-info]] - [[elisp:(switch-to-theme 'dark-laptop)][Set dark-laptop]] - [[elisp:(switch-to-theme 'deep-blue)][Set deep-blue]] - [[elisp:(switch-to-theme 'desert)][Set desert]] - [[elisp:(switch-to-theme 'digital-ofs1)][Set digital-ofs1]] - [[elisp:(switch-to-theme 'emacs-21)][Set emacs-21]] - [[elisp:(switch-to-theme 'emacs-nw)][Set emacs-nw]] - [[elisp:(switch-to-theme 'euphoria)][Set euphoria]] - [[elisp:(switch-to-theme 'feng-shui)][Set feng-shui]] - [[elisp:(switch-to-theme 'fischmeister)][Set fischmeister]] - [[elisp:(switch-to-theme 'gnome)][Set gnome]] - [[elisp:(switch-to-theme 'gnome2)][Set gnome2]] - [[elisp:(switch-to-theme 'goldenrod)][Set goldenrod]] - [[elisp:(switch-to-theme 'gray1)][Set gray1]] - [[elisp:(switch-to-theme 'gray30)][Set gray30]] - [[elisp:(switch-to-theme 'greiner)][Set greiner]] - [[elisp:(switch-to-theme 'gtk-ide)][Set gtk-ide]] - [[elisp:(switch-to-theme 'high-contrast)][Set high-contrast]] - [[elisp:(switch-to-theme 'hober)][Set hober]] - [[elisp:(switch-to-theme 'infodoc)][Set infodoc]] - [[elisp:(switch-to-theme 'jb-simple)][Set jb-simple]] - [[elisp:(switch-to-theme 'jedit-grey)][Set jedit-grey]] - [[elisp:(switch-to-theme 'jonadabian-slate)][Set jonadabian-slate]] - [[elisp:(switch-to-theme 'jonadabian)][Set jonadabian]] - [[elisp:(switch-to-theme 'jsc-dark)][Set jsc-dark]] - [[elisp:(switch-to-theme 'jsc-light)][Set jsc-light]] - [[elisp:(switch-to-theme 'jsc-light2)][Set jsc-light2]] - [[elisp:(switch-to-theme 'katester)][Set katester]] - [[elisp:(switch-to-theme 'kingsajz)][Set kingsajz]] - [[elisp:(switch-to-theme 'late-night)][Set late-night]] - [[elisp:(switch-to-theme 'lawrence)][Set lawrence]] - [[elisp:(switch-to-theme 'ld-dark)][Set ld-dark]] - [[elisp:(switch-to-theme 'lethe)][Set lethe]] - [[elisp:(switch-to-theme 'marine)][Set marine]] - [[elisp:(switch-to-theme 'marquardt)][Set marquardt]] - [[elisp:(switch-to-theme 'matrix)][Set matrix]] - [[elisp:(switch-to-theme 'midnight)][Set midnight]] - [[elisp:(switch-to-theme 'mistyday)][Set mistyday]] - [[elisp:(switch-to-theme 'montz)][Set montz]] - [[elisp:(switch-to-theme 'oswald)][Set oswald]] - [[elisp:(switch-to-theme 'parus)][Set parus]] - [[elisp:(switch-to-theme 'pierson)][Set pierson]] - [[elisp:(switch-to-theme 'pok-wob)][Set pok-wob]] - [[elisp:(switch-to-theme 'pok-wog)][Set pok-wog]] - [[elisp:(switch-to-theme 'ramangalahy)][Set ramangalahy]] - [[elisp:(switch-to-theme 'raspopovic)][Set raspopovic]] - [[elisp:(switch-to-theme 'renegade)][Set renegade]] - [[elisp:(switch-to-theme 'resolve)][Set resolve]] - [[elisp:(switch-to-theme 'retro-green)][Set retro-green]] - [[elisp:(switch-to-theme 'retro-orange)][Set retro-orange]] - [[elisp:(switch-to-theme 'robin-hood)][Set robin-hood]] - [[elisp:(switch-to-theme 'rotor)][Set rotor]] - [[elisp:(switch-to-theme 'ryerson)][Set ryerson]] - [[elisp:(switch-to-theme 'salmon-diff)][Set salmon-diff]] - [[elisp:(switch-to-theme 'salmon-font-lock)][Set salmon-font-lock]] - [[elisp:(switch-to-theme 'scintilla)][Set scintilla]] - [[elisp:(switch-to-theme 'shaman)][Set shaman]] - [[elisp:(switch-to-theme 'simple-1)][Set simple-1]] - [[elisp:(switch-to-theme 'sitaramv-nt)][Set sitaramv-nt]] - [[elisp:(switch-to-theme 'sitaramv-solaris)][Set sitaramv-solaris]] - [[elisp:(switch-to-theme 'snow)][Set snow]] - [[elisp:(switch-to-theme 'snowish)][Set snowish]] - [[elisp:(switch-to-theme 'standard-ediff)][Set standard-ediff]] - [[elisp:(switch-to-theme 'standard)][Set standard]] - [[elisp:(switch-to-theme 'subtle-blue)][Set subtle-blue]] - [[elisp:(switch-to-theme 'subtle-hacker)][Set subtle-hacker]] - [[elisp:(switch-to-theme 'taming-mr-arneson)][Set taming-mr-arneson]] - [[elisp:(switch-to-theme 'taylor)][Set taylor]] - [[elisp:(switch-to-theme 'tty-dark)][Set tty-dark]] - [[elisp:(switch-to-theme 'vim-colors)][Set vim-colors]] - [[elisp:(switch-to-theme 'whateveryouwant)][Set whateveryouwant]] - [[elisp:(switch-to-theme 'wheat)][Set wheat]] - [[elisp:(switch-to-theme 'word-perfect)][Set word-perfect]] - [[elisp:(switch-to-theme 'xemacs)][Set xemacs]] - [[elisp:(switch-to-theme 'xp)][Set xp]] - [[elisp:(switch-to-theme 'julie)][Set julie]] - [[elisp:(switch-to-theme 'subdued)][Set subdued]] - [[elisp:(switch-to-theme 'railscast)][Set railscast]] * Local Variables :noexport: # Local Variables: # org-confirm-babel-evaluate: nil # org-display-inline-images: t # end: