diff options
Diffstat (limited to 'lib/sasl.ml')
-rw-r--r-- | lib/sasl.ml | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/lib/sasl.ml b/lib/sasl.ml index 8206309..d72f11d 100644 --- a/lib/sasl.ml +++ b/lib/sasl.ml @@ -30,12 +30,8 @@ let send_auth_stanza (stream, push) localpart pass mechanism = | Some s -> s in let nsless = match stanza with - | { - namespace = "urn:ietf:params:xml:ns:xmpp-sasl"; - attributes = []; - local_name; - children=rest; - } -> (local_name, rest) + | {namespace; attributes = []; local_name; children=rest} + when namespace = Xmlns.sasl -> (local_name, rest) | _ -> raise (InvalidStanza (Xml.element_to_string stanza)) in let open Either in |