Dynamic garden stylesheet generation

css.clj

(ns app.css
  (:refer-clojure :exclude [+ - * /])
  (:require [garden.core :refer [css]]
            [garden.color :as color :refer [hsl hsla rgb]]
            [garden.arithmetic :refer [+ - * /]]
            [garden.units :as u :refer [em px pt]]))

(def active-color "#1292C9")
(def app-background-color "#F6F6F6")
(def background-color "#3E3A60")
(def dark-color "#40464B")

(def action-text {:font-weight 700
                  :text-transform "uppercase"})

(def main
  (css
    ;;-----------------------------------------------------------------------------
    ;; Base
    ;;-----------------------------------------------------------------------------

    [:html :body
     {:height "100%"}]))

routes.clj

(ns app.routes
  (:require [compojure.core :refer :all]
            [app.css :as css]))

(defroutes css-routes
  (GET "/css/main.css" []
       {:status 200
        :headers {"Content-Type" "text/css; charset=utf-8"}
        :body css/main}))