Clojurians Log v2

i just tried to integrate it into a test suite as a before-each hook and im not sure if it's a good idea to make it recursive, because of that implicit clip/start. that would mean u can only start systems using this with construct, but intuitively i wrote the following code first:

(declare ^:dynamic q)

(use-fixtures
  :each (fn [test-case]
          (sys/with [sys {:components (merge sys/datomic sys/graphql)}
                     {:keys [graphql/schema-fn]} sys
                     schema (schema-fn)]
            (binding [q (fn [query] (gql/execute schema query {} {}))]
              (test-case)))))

which wouldn't work, even if with would have handled multiple bindings... so currently i have this instead:

(use-fixtures
  :each (fn [test-case]
          (sys/with [sys {:components (merge sys/datomic sys/graphql)}]
            (let [{:keys [graphql/schema-fn]} sys
                  schema (schema-fn)]
              (binding [q (fn [query] (gql/execute schema query {} {}))]
                (test-case))))))

(deftest query-test
  (expect {:data {:txns [{:id "x" :tags ["tag-1"]}]}}
          (q "{ txns { id tags } }")))

For the record, before I started using clip, I had a macro, like this:

(defmacro in-tmp-db [& body]
  `(let [db-uri# (str (gensym "datomic:<mem://test>-"))]
     (d/create-database db-uri#)
     (let [~'conn (d/connect db-uri#)
           ~'tx! (fn [&amp; ~'args] (apply d/transact ~'conn ~'args))
           ~'db! (fn [] (d/db ~'conn))
           ~'entity (fn [&amp; ~'args] (apply d/entity (~'db!) ~'args))
           ~'entid (fn [&amp; ~'args] (apply d/entid (~'db!) ~'args))
           ~'pull (fn [&amp; ~'args] (apply d/pull (~'db!) ~'args))]
       (try
         @(~'tx! (datomic/schema))
         ~@body
         (finally
           (d/release ~'conn)
           (d/delete-database db-uri#))))))

(deftest some-test
  (expecting "something"
    (in-tmp-db
      (some.datomic/transaction! conn {:entity "map"})
      (expect #{"data-1" "data-2"} (some.datomic/query (db!) [:lookup "ref"])))))

I don't understand the question, sorry

Seems like the https://juxt.pro/radar.html page is broken.

Thanks for flagging! We are on the process of killing/reworking a few pages :)

I’m having a bit of trouble finding a parse function in juxt/tick I have a date string like this. “`20091127"` which I want to convert into a proper date.

Looking for the equivalent of this from clj-time

(f/parse custom-formatter "20100311")
=> #<DateTime 2010-03-11T00:00:00.000Z>

Hey there, internally we use an interface IParseable which just uses a regex to split up the string and pass the ints to the relevant constructors (https://github.com/juxt/tick/blob/1e14333e3ce142dd3eebb0cca9449a980a924f1e/src/tick/core.cljc#L117). We don't provide a method to create a IParseable instance from a string, so i think the easiest way to read that string in is splice in dashes at the relevant points and then just pass it to tick/parse. There's a parser in there yy yy-mm-dd which is basically what you need.