remove populate and create only methods and fix run in case of report path is unnecessary

Author: shmuelko

src/practitest_firecracker/cli.clj

@@ -66,7 +66,7 @@
    ["-h" "--help"]])
 
 (defn usage [options-summary]
-  (->> ["PractiTest Surefire reports analyzer."
+  (->> ["PractiTest reports analyzer."
         ""
         "Usage: java -jar practitest-firecracker-standaline.jar [options] action"
         ""
@@ -115,30 +115,6 @@
 
       (= "version" (first arguments))
       {:action "version" :options options}
-      ;; (= "create-testset" (first arguments))
-      ;; (cond
-      ;;   (nil? (:project-id options))
-      ;;   {:exit-message (missing-option-msg "create-testset" "project-id")}
-
-      ;;   (nil? (:author-id options))
-      ;;   {:exit-message (missing-option-msg "create-testset" "author-id")}
-
-      ;;   (nil? (:testset-name options))
-      ;;   {:exit-message (missing-option-msg "create-testset" "testset-name")}
-
-      ;;   :else
-      ;;   {:action "create-testset" :options options})
-
-      (= "populate-testset" (first arguments))
-      (cond
-        (nil? (:project-id options))
-        {:exit-message (missing-option-msg "populate-testset" "project-id")}
-
-        (nil? (:testset-id options))
-        {:exit-message (missing-option-msg "populate-testset" "testset-id")}
-
-        :else
-        {:action "populate-testset" :options options})
 
       (= "create-and-populate-testset" (first arguments))
       (cond

src/practitest_firecracker/core.clj

@@ -30,8 +30,8 @@
       (exit (if ok? 0 1) exit-message)
       (let [client             (make-client (select-keys options [:email :api-token :api-uri :max-api-rate]))
             directory          (:reports-path options)
-            dirs               (for [dir directory] (clojure.java.io/file dir))
-            parsed-dirs        (for [dir (file-seq (first dirs))] (parse-files dir))
+            dirs               (when-not (nil? directory) (for [dir directory] (clojure.java.io/file dir)))
+            parsed-dirs        (when-not (nil? dirs) (for [dir (file-seq (first dirs))] (parse-files dir)))
             additional-reports (send-directory parsed-dirs (:test-case-as-pt-test-step options) (:multitestset options) (:testset-name options) false)
             start-time         (t/now)]
           (case action