(deftheme custom-theme
  "A custom Emacs theme using the provided color palette.")

(let ((bg "#76a9c0")
      (fg "#77857a")
      (keyword "#b4d7e3")
      (comment "#adc4db")
      (string "#d6c1d1"))

  (custom-theme-set-faces
   'custom-theme

   ;; Default
   `(default ((t (:background ,bg :foreground ,fg))))

   ;; Syntax highlighting
   `(font-lock-keyword-face ((t (:foreground ,keyword))))
   `(font-lock-comment-face ((t (:foreground ,comment))))
   `(font-lock-string-face ((t (:foreground ,string))))

   ;; Mode line
   `(mode-line ((t (:background ,bg :foreground ,fg))))
   `(mode-line-inactive ((t (:background ,fg :foreground ,bg))))

   ;; Region
   `(region ((t (:background ,keyword :foreground ,bg))))

   ;; Minibuffer
   `(minibuffer-prompt ((t (:foreground ,keyword))))

   ;; Powerline separator
   `(powerline-active1 ((t (:background ,bg :foreground ,fg))))
   `(powerline-active2 ((t (:background ,fg :foreground ,bg))))

   ;; Highlight
   `(highlight ((t (:background ,comment :foreground ,bg))))
   `(hl-line ((t (:background ,bg))))

   ;; Parenthesis matching
   `(show-paren-match ((t (:background ,fg :foreground ,bg))))
   `(show-paren-mismatch ((t (:background ,comment :foreground ,bg)))))

  (provide-theme 'custom-theme))

(provide 'custom-theme)