Blob


1 (ns blog.net-gemini
2 (:import (com.omarpolo.gemini Request)))
4 (defn head [host port req]
5 (with-open [res (Request. host port (str req "\r\n"))]
6 {:code (.getCode res)
7 :meta (.getMeta res)}))
9 (comment
10 (with-open [res (Request. "gemini://localhost/index.gmi")]
11 {:code (.getCode res)
12 :meta (.getMeta res)})
13 )