mynomoto

(ns styles.hoplon
  (:require garden.compiler
            hoplon.core))

(defmethod hoplon.core/do! :garden
  [el _ v]
  ; Replace all the inline styles on an element with css generated by Garden.
  ; Obviously does not play nice with other methods of setting inline styles.
  (let [vs (if (sequential? v) v [v])
        css (garden.compiler/compile-style vs)]

mynomoto

(ns ui.app
  (:refer-hoplon :exclude [main body])
  (:refer-clojure :exclude [meta])
  (:require-macros [ui.app :as app])
  (:require [app.routes :as routes]
            [app.integrations :as int]
            [ui.global-state :as global]))

(def meta html-meta)

mynomoto

(require '[boot.pod :as pod])

(def pod-deps '[[boot/core "2.6.0" :scope "test"]
                [adzerk/env "0.3.0" :scope "test"]
                [me.raynes/conch "0.8.0" :scope "test"]])

(deftask postgres []
  (let [pod (future (pod/make-pod (update-in (get-env) [:dependencies] into pod-deps)))]
    (with-pass-thru _
      (pod/with-eval-in @pod