summaryrefslogtreecommitdiff
path: root/bin/leda.ml
diff options
context:
space:
mode:
authorRyan Kavanagh <rak@rak.ac>2020-06-02 12:10:14 -0400
committerRyan Kavanagh <rak@rak.ac>2020-06-07 11:39:58 -0400
commit6fcb6e0f2fd4b93d094c68e844e7c1d0bd58a894 (patch)
tree985a8055db77097ec343304d63b4a5da2bbe0f84 /bin/leda.ml
parentRename request to geminiTransaction (diff)
string_to_request -> make_request
Diffstat (limited to 'bin/leda.ml')
-rw-r--r--bin/leda.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/bin/leda.ml b/bin/leda.ml
index 8c20e4b..1438796 100644
--- a/bin/leda.ml
+++ b/bin/leda.ml
@@ -7,7 +7,7 @@ module R = Gemini.GeminiTransaction.GeminiTransaction(T)
let () =
Lwt_main.run begin
- let req = R.string_to_request "gemini://gemini.circumlunar.space/\r\n" in
+ let req = R.make_request ~url:"gemini://gemini.circumlunar.space/\r\n" in
let%lwt response = R.transaction req in
match response with
| Some (_, _, s) -> Lwt_io.printl s