From 95ddfc29840d980c2197f2681f804f85df160798 Mon Sep 17 00:00:00 2001 From: Clombrong Date: Sun, 29 Jun 2025 18:20:34 +0200 Subject: feat(stream): add config type --- lib/stream.ml | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/lib/stream.ml b/lib/stream.ml index a71d662..4bc0901 100644 --- a/lib/stream.ml +++ b/lib/stream.ml @@ -5,10 +5,16 @@ exception ClosedStream exception InsufficientEncryption type feature = - | Mechanisms of Sasl.mechanism list | STARTTLS + | Mechanisms of Sasl.mechanism list | Other of Xml.element +type config = { + starttls : Starttls.config; + sasl : Sasl.config; + other : (Markup.signal, Markup.sync) Markup.stream list; + } + (** [features] is a tuple of features list, mandatory and optional. *) type features = (feature list * feature list) -- cgit v1.2.3