src/dda/build/infrastructure.clj

@@ -11,3 +11,15 @@
       (println command))
     (when-not dry-run
       (apply t/shell command))))
+
+(defn-spec execute-output! string?
+  [command seq?
+   devops ::d/devops]
+  (let [{:keys [dry-run debug]} devops]
+    (when debug
+      (println command))
+    (when-not dry-run
+      (->> command
+           (t/shell {:out :string})
+           :out
+           clojure.string/trim))))