;;; customizeRainbowDelimiters.el ---  -*- lexical-binding: t; -*-

;; Copyright (C) 2018, Paul Horton
;; License: GNU GPLv3

;; Author: Paul Horton
;; Maintainer: Paul Horton
;; Created: 20181209
;; Updated: 20181209
;; Version: 0.0
;; Keywords: rainbow-delimiters, colors

;;; Commentary:

;;; Change Log:

;;; Code:


;; Customize rainbow-delimiters to cycle through three colors.
(with-eval-after-load 'rainbow-delimiters
  (setq rainbow-delimiters-max-face-count 3)
  (let ((light ["#6276ba" "cyan2" "#A09183"])
        (dark  ["yellow1" "red3" "sky blue"]))
    (dotimes (depth rainbow-delimiters-max-face-count)
      (face-spec-set
       (intern (format "rainbow-delimiters-depth-%d-face" (1+ depth)))
       `(
         (((class color) (background light)) :foreground ,(elt light depth))
         (((class color) (background dark))  :foreground ,(elt dark  depth))
         )
       'face-defface-spec)
      ))

  (add-hook 'prog-mode-hook #'rainbow-delimiters-mode)
)


;;; customizeRainbowDelimiters.el ends here