summaryrefslogtreecommitdiff
path: root/gemini
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--gemini/geminiTransaction.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/gemini/geminiTransaction.ml b/gemini/geminiTransaction.ml
index 56cbb7f..29f9ec6 100644
--- a/gemini/geminiTransaction.ml
+++ b/gemini/geminiTransaction.ml
@@ -237,7 +237,7 @@ struct
try%lwt
let%lwt (ic, oc) = Tls_lwt.connect_ext
Tls.Config.(client ~peer_name:host ~authenticator
- ~ciphers:Ciphers.supported ()) (host, port) in
+ ~ciphers:Ciphers.default ()) (host, port) in
let%lwt () = Lwt_io.write oc (Uri.to_string r.url ^ "\r\n") in
let%lwt (_, parsed) = parse response_parser ic in
Lwt.return parsed