aboutsummaryrefslogtreecommitdiff
path: root/lib/sasl.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/sasl.ml')
-rw-r--r--lib/sasl.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/sasl.ml b/lib/sasl.ml
index 1837044..81c4476 100644
--- a/lib/sasl.ml
+++ b/lib/sasl.ml
@@ -59,7 +59,7 @@ let send_auth_stanza ({stream; push; _} : Portal.t) localpart pass mechanism =
`Text [gen_auth mechanism];
`End_element]
in Some (Markup.of_list stanza_list) |> push;
- try Xml.get stream >|= parse_sasl_response
+ try Wire.get stream >|= parse_sasl_response
with exn -> Lwt.fail exn
let authenticate