Fix tests in unit_test.clj

clj-commons · Oct 7, 2024 · ced522d · ced522d
1 parent d1ad0eb
commit ced522d
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/test/etaoin/unit/unit_test.clj b/test/etaoin/unit/unit_test.clj
@@ -16,7 +16,9 @@
   (with-redefs
    [etaoin.impl.proc/run  (fn [_ _] {:some :process})
     e/wait-running     identity
+    e/get-status (fn [_] {:ready true :message "I'm ready"})
     e/create-session   (fn [_ _] "session-key")
+    e/get-window-handle (fn [_] "ABCDEFG")
     proc/kill identity
     e/delete-session   identity
     util/get-free-port (constantly 12345)]
@@ -142,7 +144,9 @@
         [etaoin.impl.proc/run  (fn [_ _]
                                  (swap! run-calls inc)
                                  {:some :process})
+         e/get-status (fn [_] {:ready true :message "I'm ready"})
          e/create-session   (fn [_ _] "session-key")
+         e/get-window-handle (fn [_] "ABCDEFG")
          proc/kill (fn [_]
                      (swap! kill-calls inc))
          e/delete-session   identity