 ;; Copyright (C) 2016-2018  Dan Harms (dan.harms)
 ;; Author: Dan Harms <dan.harms@xrtrading.com>
 ;; Created: Wednesday, December 21, 2016
-;; Modified Time-stamp: <2018-06-26 12:31:19 dan.harms>
+;; Modified Time-stamp: <2018-06-27 09:21:10 dan.harms>
 ;; Modified by: Dan Harms
 ;; Keywords: themes colors
 

                                                                          :background "gray6")))))
           (custom-theme-set-faces sym '(magit-section-highlight ((t (:background "grey23"))))))
          ((eq sym 'distinguished)
           (my/make-comment-delimiter-face-same-as-comment-face sym))
          ((eq sym 'eltbus)
           (my/make-comment-delimiter-face-same-as-comment-face sym))
          ((eq sym 'evenhold)
           (my/make-comment-delimiter-face-same-as-comment-face sym))
          ((eq sym 'granger)
           (my/make-comment-delimiter-face-same-as-comment-face sym))
          ((eq sym 'hober2)
           (my/make-comment-delimiter-face-same-as-comment-face sym))
          ((memq sym '(kaolin-dark kaolin-mono-dark kaolin-light kaolin-eclipse kaolin-galaxy
                                   kaolin-ocean kaolin-aurora kaolin-valley-dark kaolin-valley-light
                                   kaolin-bubblegum))

          ((eq sym 'railscast)
           (custom-theme-set-faces sym '(cursor ((t (:background "#FFC66D"))))))
          ((eq sym 'soothe)
           (harmsway/make-comment-delimiter-face-same-as-comment-face sym))
          ((eq sym 'sourcerer)
           (custom-theme-set-faces sym '(cursor ((t (:background "yellow3"))))))
          ((eq sym 'subatomic)
           (harmsway/make-comment-delimiter-face-same-as-comment-face sym))
          ((eq sym 'tangotango)
           (custom-theme-set-faces sym '(magit-section-highlight ((t (:background "grey23"))))))
          ((eq sym 'tao-yang)
           (harmsway/make-comment-delimiter-face-same-as-comment-face sym))
          ((eq sym 'tao-yin)
           (harmsway/make-comment-delimiter-face-same-as-comment-face sym))
          ((eq sym 'wombat)
           (custom-theme-set-faces sym '(cursor ((t (:background "#8ac6f2")))))
           ;; switch isearch and lazy-highlight
           (custom-theme-set-faces sym '(isearch ((t (:background "#384048" :foreground "#a0a8b0")))))
           (custom-theme-set-faces sym '(lazy-highlight ((t (:background "#343434" :foreground "#857b6f"))))))
          ((eq sym 'xp)
           (harmsway/make-all-font-sizes-the-same-please)
           (custom-theme-set-faces sym '(fringe ((t :background "LightYellow3")))))
          )
    (cond ((memq sym harmsway/sml-dark-themes)
           (load-theme 'smart-mode-line-dark t))
          ((memq sym harmsway/sml-light-themes)
           (load-theme 'smart-mode-line-light t))
          ((memq sym harmsway/sml-respectful-themes)
           (load-theme 'smart-mode-line-respectful t))
          )))
(advice-add 'counsel-load-theme-action :after #'harmsway/after-load-theme)

(provide 'custom-themes)
;;; custom-themes.el ends here
