master
Josha von Gizycki 6 years ago
parent c94a3b3de5
commit 0efab2eb26

@ -12,7 +12,9 @@
(:gen-class))
(defn- home-dir [pipeline-name]
(str (System/getProperty "user.home") "/wanijo-pipeline/" pipeline-name))
(let [dir (str (System/getProperty "user.home") "/wanijo-pipeline/" pipeline-name)]
(log/info (str "Home dir is " dir))
dir))
(defn wanijo-pipeline []
(lambdacd/assemble-pipeline pipeline/pipeline-def
@ -21,7 +23,7 @@
(defn formulare-pipeline []
(lambdacd/assemble-pipeline fp/pipeline-def
{:home-dir (create-temp-dir "formulare")
{:home-dir (home-dir "formulare")
:name "formulare pipeline"}))
(defn -main [& args]

Loading…
Cancel
Save