|
|
@ -7,11 +7,8 @@
|
|
|
|
(defn pull [args ctx]
|
|
|
|
(defn pull [args ctx]
|
|
|
|
(lcd-shell/bash ctx "/opt/wedder" "git pull"))
|
|
|
|
(lcd-shell/bash ctx "/opt/wedder" "git pull"))
|
|
|
|
|
|
|
|
|
|
|
|
(defn lein [target args ctx]
|
|
|
|
|
|
|
|
(lcd-shell/bash ctx (:cwd args) (str "lein " target)))
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
(defn compile [args ctx]
|
|
|
|
(defn compile [args ctx]
|
|
|
|
(lein "uberjar" args ctx))
|
|
|
|
(lcd-shell/bash ctx "/opt/wedder" "lein uberjar"))
|
|
|
|
|
|
|
|
|
|
|
|
(defn kill-previous [args ctx]
|
|
|
|
(defn kill-previous [args ctx]
|
|
|
|
(lcd-shell/bash ctx (:cwd args) "pkill -f wedder"))
|
|
|
|
(lcd-shell/bash ctx (:cwd args) "pkill -f wedder"))
|
|
|
|