You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
33 lines
919 B
33 lines
919 B
(ns wanijo-pipeline.steps
|
|
(:require [lambdacd.steps.shell :as lcd-shell]
|
|
[lambdacd-git.core :as lcd-git]))
|
|
|
|
(def repo-uri "https://gitea.heevyis.ninja/josha/wanijo.git")
|
|
(def repo-branch "master")
|
|
|
|
(defn wait-for-repo [args ctx]
|
|
(lcd-git/wait-for-git ctx
|
|
repo-uri
|
|
:ref (str "refs/heads/" repo-branch)))
|
|
|
|
(defn clone [args ctx]
|
|
(let [revision (:revision args)
|
|
cwd (:cwd args)
|
|
ref (or revision repo-branch)]
|
|
(lcd-git/clone ctx repo-uri ref cwd)))
|
|
|
|
(defn ancient [args ctx]
|
|
(lcd-shell/bash ctx (:cwd args) "lein ancient :all"))
|
|
|
|
(defn compile [args ctx]
|
|
(lcd-shell/bash ctx (:cwd args) "lein compile"))
|
|
|
|
(defn test [args ctx]
|
|
(lcd-shell/bash ctx (:cwd args) "lein test"))
|
|
|
|
(defn bikeshed [args ctx]
|
|
(lcd-shell/bash ctx (:cwd args) "lein bikeshed"))
|
|
|
|
(defn eastwood [args ctx]
|
|
(lcd-shell/bash ctx (:cwd args) "lein eastwood"))
|