From b947c62e832fb3bb8d03059fdda5ee82f54ce47f Mon Sep 17 00:00:00 2001
From: Arne Brasseur <arne@arnebrasseur.net>
Date: Fri, 12 May 2023 14:48:10 -0400
Subject: [PATCH] Post-rebase fixups

---
 src/kaocha/testable.clj          | 10 +++++-----
 test/unit/kaocha/config_test.clj | 12 ++++++------
 2 files changed, 11 insertions(+), 11 deletions(-)

diff --git a/src/kaocha/testable.clj b/src/kaocha/testable.clj
index 0c9b1099..546e8926 100644
--- a/src/kaocha/testable.clj
+++ b/src/kaocha/testable.clj
@@ -124,8 +124,8 @@
         (assoc testable ::load-error t)
         (throw t)))))
 
-(s/fdef load
-  :args (s/cat :testable :kaocha/testable)
+(spec/fdef load
+  :args (spec/cat :testable :kaocha/testable)
   :ret :kaocha.test-plan/testable)
 
 (defmulti -run
@@ -268,8 +268,8 @@
 
 (defn current-thread-info []
   (let [thread (Thread/currentThread)]
-    {:name (.getName thread) 
-     :id (.getId thread) 
+    {:name (.getName thread)
+     :id (.getId thread)
      :group-name (.getName (.getThreadGroup thread))}))
 
 (defn run-testables-parallel
@@ -278,7 +278,7 @@
   (doall testables)
   (let [load-error? (some ::load-error testables)
         types (set (:parallel-children-exclude *config*))
-        suites  (:parallel-suites-exclude *config*) 
+        suites  (:parallel-suites-exclude *config*)
         futures (map #(do
                         (future
                           (binding [*config*
diff --git a/test/unit/kaocha/config_test.clj b/test/unit/kaocha/config_test.clj
index b666147c..478702b5 100644
--- a/test/unit/kaocha/config_test.clj
+++ b/test/unit/kaocha/config_test.clj
@@ -66,7 +66,7 @@
 
 (deftest merge-ns-patterns-issue-124-test
   (testing "https://github.com/lambdaisland/kaocha/issues/124"
-    (is (= #:kaocha{:early-exit 250}
+    (is (= #:kaocha{:early-exit 252}
            (try+
             (config/merge-config {:kaocha/ns-patterns "test"} {:kaocha/ns-patterns "test"})
             (catch :kaocha/early-exit e
@@ -158,11 +158,11 @@
                    :kaocha/plugins (m/embeds [:some.kaocha.plugin/qux :other.kaocha.plugin/bar])}
                   (config/load-config-for-cli-and-validate (io/resource "kaocha/config/loaded-test-resource.edn") {}))))
     (testing "falls back to default when resource does not exist"
-      (is (match? 
-            ;; Deliberately minimal case because we want to test this behavior
-            ;; (fallback to tests.edn) without tying too much to tests.edn
-            {:kaocha.hooks/pre-load ['kaocha.assertions/load-assertions] }
-             (config/load-config-for-cli-and-validate (io/resource "resource-that-does-not-exist.edn") {})))))
+      (is (match?
+           ;; Deliberately minimal case because we want to test this behavior
+           ;; (fallback to tests.edn) without tying too much to tests.edn
+           {:kaocha.hooks/pre-load ['kaocha.assertions/load-assertions] }
+           (config/load-config-for-cli-and-validate (io/resource "resource-that-does-not-exist.edn") {})))))
   (testing "loading a file with profiles"
     (testing "specifying a profile"
       (is (match? {:kaocha/reporter 'kaocha.report.progress/report}