diff options
| author | Clombrong <cromblong@egregore.fun> | 2025-06-27 08:33:40 +0200 |
|---|---|---|
| committer | Clombrong <cromblong@egregore.fun> | 2025-06-27 09:53:10 +0200 |
| commit | 13273777453522c4b73083207b3ba50ea3ca6bd0 (patch) | |
| tree | d51393040998bd5112201774c4c464b07e778bcd /lib/stream.ml | |
| parent | 9276b39bcbed5e368d86da1bf02cba01fc164772 (diff) | |
feat(wire): move next and get from xml to wire
Diffstat (limited to 'lib/stream.ml')
| -rw-r--r-- | lib/stream.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/stream.ml b/lib/stream.ml index a4795ef..01d6a55 100644 --- a/lib/stream.ml +++ b/lib/stream.ml @@ -45,5 +45,5 @@ let parse_features (el : Xml.element) : features = {{: https://datatracker.ietf.org/doc/html/rfc6120#section-4.3 }}. *) let negotiate (domain : string) (portal : Portal.t) : features Lwt.t = let* _id = Portal.header domain portal - in let+ features = Xml.get portal.stream >|= parse_features + in let+ features = Wire.get portal.stream >|= parse_features in features |