From 6fcb6e0f2fd4b93d094c68e844e7c1d0bd58a894 Mon Sep 17 00:00:00 2001
From: Ryan Kavanagh <rak@rak.ac>
Date: Tue, 2 Jun 2020 12:10:14 -0400
Subject: string_to_request -> make_request

---
 bin/leda.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'bin')

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
-- 
cgit v1.2.3