luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Disable #1596 test

Browse source
This commit is contained in:
Michiel Borkent 2023-08-08 11:15:35 +02:00
parent b6e8f86595
commit a8e7d35dfa
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
test/babashka/impl/clojure/java/browse_test.clj
View file

@ -1,5 +1,5 @@
(ns babashka.impl.clojure.java.browse-test (ns babashka.impl.clojure.java.browse-test
(:require #_(:require
[babashka.test-utils :refer [bb]] [babashka.test-utils :refer [bb]]
[cheshire.core :as json] [cheshire.core :as json]
[clojure.test :refer [deftest is]] [clojure.test :refer [deftest is]]
@ -7,7 +7,7 @@
(def ^:dynamic *http-port* 1234) (def ^:dynamic *http-port* 1234)
(deftest browse-url-test #_(deftest browse-url-test
(let [p (promise) (let [p (promise)
stop-server (http/run-server (fn [{:keys [query-string]}] stop-server (http/run-server (fn [{:keys [query-string]}]
(let [params (apply hash-map (mapcat #(.split % "=") (.split query-string "&")))] (let [params (apply hash-map (mapcat #(.split % "=") (.split query-string "&")))]
@ -22,4 +22,4 @@
(is (= {"arg1" "v1" (is (= {"arg1" "v1"
"arg2" "v2"} "arg2" "v2"}
(deref p 5000 ::timeout))) (deref p 5000 ::timeout)))
(finally (stop-server :timeout 1000))))) (finally (stop-server :timeout 1000)))))