                            :background nil
                            :inherit nil))
 
-     (when (require 'popup nil t)
+     (when (featurep 'popup)
 
        ;; flymake 現在行のエラーをpopup.elのツールチップで表示する
        ;; https://gist.github.com/292827

  )

;; whitespace-mode
(when (require 'whitespace nil t)
  ;; n 列以上はハイライトで警告
  ;; (setq whitespace-line-column 90)


;; -------------------------------------------------------------------------
;; 色とか
(when (kui/package-require 'color-theme nil nil t)
  (color-theme-initialize))

(when (and (kui/package-require 'color-theme-sanityinc-tomorrow)
           (featurep 'color-theme))
  (load-theme 'sanityinc-tomorrow-night t))

(custom-set-faces
 '(highlight
   ((((background dark))
     :background "#222244")))
 '(show-paren-match
   ((((background dark))
     :inherit nil
     :weight bold
     :underline t
     :background "black"
     :foreground nil))))

(unless window-system
  (custom-set-faces
   '(mode-line
     ((((background dark))
       :background "#444444")))
   '(highlight
     ((((background dark))
       :background "#262626"
       :inherit nil)))))

(when (featurep 'helm)
  (custom-set-faces
   '(helm-buffer-directory
     ((((background dark))
       :foreground "#33ff33")))
   '(helm-ff-directory
     ((((background dark))
       :foreground "#33ff33")))
   '(helm-selection
     ((t
       :inherit 'highlight
       :weight bold)))))

(when (featurep 'git-gutter)
  (custom-set-faces
   '(git-gutter:unchanged ((t :background nil)))
   '(git-gutter:modified  ((t :background nil)))
   '(git-gutter:added     ((t :background nil)))
   '(git-gutter:deleted   ((t :background nil)))))

;; -------------------------------------------------------------------------
;; window system がある時
