Add the main for the cli module.

2023-10-25 22:03:02 +03:00
parent e70b72f0ec
commit 3a3682f2c4
2 changed files with 8 additions and 4 deletions
@@ -160,3 +160,10 @@

     (show-and-save-output options))))

+(defn cli-main
+  [args]
+  (let [{:keys [options arguments action-type exit-message ok?]} (validate-args args)]
+    (if exit-message
+      (exit exit-message ok?)
+      (actions options arguments action-type))))
+