|
@ -171,8 +171,11 @@ Some windows specific stuff |
|
|
(interactive) |
|
|
(interactive) |
|
|
(when *windows* |
|
|
(when *windows* |
|
|
(if (eq (car custom-enabled-themes) 'ample-flat) |
|
|
(if (eq (car custom-enabled-themes) 'ample-flat) |
|
|
(disable-theme 'ample-flat) |
|
|
|
|
|
(enable-theme 'ample-flat)))) |
|
|
|
|
|
|
|
|
(progn (disable-theme 'ample-flat) |
|
|
|
|
|
(enable-theme 'adwaita)) |
|
|
|
|
|
(progn |
|
|
|
|
|
(disable-theme 'adwaita) |
|
|
|
|
|
(enable-theme 'ample-flat))))) |
|
|
#+END_SRC |
|
|
#+END_SRC |
|
|
|
|
|
|
|
|
Windows Theme: |
|
|
Windows Theme: |
|
|