Making it possible to run one-off square
This commit is contained in:
11
src/clj/auto_ap/jobs/square.clj
Normal file
11
src/clj/auto_ap/jobs/square.clj
Normal file
@@ -0,0 +1,11 @@
|
||||
(ns auto-ap.jobs.square
|
||||
(:gen-class)
|
||||
(:require [auto-ap.square.core :as square]
|
||||
[auto-ap.utils :refer [heartbeat]]
|
||||
[mount.core :as mount]
|
||||
[auto-ap.datomic :refer [conn]]))
|
||||
|
||||
(defn -main [& _]
|
||||
(mount/start (mount/only #{#'conn}))
|
||||
((heartbeat square/upsert-all "square-loading")))
|
||||
|
||||
Reference in New Issue
Block a user