lupan/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

switch to spacemacs-dark-theme, new functions my-(light|dark)-theme

Browse Source
This commit is contained in:
Łukasz Pankowski 2017-04-09 21:39:43 +02:00
parent 55d469f339
commit 8faa6d8868
1 changed files with 20 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
init.el
View File

@ -124,10 +124,26 @@ Argument FRAMES has the same meaning as for `set-frame-font'"
:defer) :defer)
(defun my-make-frame-function(frame) (defun my-make-frame-function(frame)
(when (not (custom-theme-p 'tango-dark)) (with-selected-frame frame ;; needed for spacemacs powerline colors to be applied properly
(load-theme 'tango-dark) (when (not (featurep 'spacemacs-dark-theme))
(if (require 'powerline nil t) (require 'spacemacs-dark-theme nil t)
(powerline-center-theme)))) (when (require 'powerline nil t)
(powerline-center-theme)))))
(defun my-light-theme ()
"Switch to Spacemacs light theme."
(interactive)
(when (require 'spacemacs-light-theme nil t)
(enable-theme 'spacemacs-light)
(disable-theme 'spacemacs-dark)))
(defun my-dark-theme ()
"Switch to Spacemacs dark theme."
(interactive)
(when (require 'spacemacs-dark-theme nil t)
(enable-theme 'spacemacs-dark)
(disable-theme 'spacemacs-light)))
(when window-system (when window-system
(my-make-frame-function (selected-frame))) (my-make-frame-function (selected-frame)))