     (apply use-fixtures :each cache-fixture (map #(db-fixture (var-get (resolve (symbol %)))) dbs))
     (doseq [db dbs]
       (define-tests db))
-    (run-tests)))+    (run-tests)))

    (ixa/transaction
     (write-thing-to-db {:datasource db} "kiwi")
     (imsg/publish "/queue/test" "kiwi")
     (ic/put cache :a 1)
     (if f (f)))
    (catch Exception _)))


;;; Create a JMS queue
(imsg/start "/queue/test")
(imsg/start "/queue/remote-test")

;;; And an Infinispan cache
(def cache (ic/cache "test"))
