25 lines
976 B
Clojure
25 lines
976 B
Clojure
(ns babashka.curl-test
|
|
(:require [babashka.curl :as curl]
|
|
[cheshire.core :as json]
|
|
[clojure.test :as t :refer [deftest]]))
|
|
|
|
(deftest curl-test
|
|
(require '[babashka.curl :as curl] :reload-all)
|
|
|
|
(prn (:status (curl/get "https://www.clojure.org")))
|
|
|
|
(prn (:status (curl/get "https://postman-echo.com/get?foo1=bar1&foo2=bar2")))
|
|
|
|
(prn (:status (curl/post "https://postman-echo.com/post")))
|
|
|
|
(prn (:status (curl/post "https://postman-echo.com/post"
|
|
{:body (json/generate-string {:a 1})
|
|
:headers {"X-Hasura-Role" "admin"}
|
|
:content-type :json
|
|
:accept :json})))
|
|
|
|
(prn (:status (curl/put "https://postman-echo.com/put"
|
|
{:body (json/generate-string {:a 1})
|
|
:headers {"X-Hasura-Role" "admin"}
|
|
:content-type :json
|
|
:accept :json}))))
|