diff options
author | Evgeniy Khramtsov <ekhramtsov@process-one.net> | 2017-01-13 11:35:47 +0300 |
---|---|---|
committer | Evgeniy Khramtsov <ekhramtsov@process-one.net> | 2017-01-13 11:35:47 +0300 |
commit | 31491ebe16706f9cefcc27c6722fc6e8e2b013b1 (patch) | |
tree | 22ba4801ab6385c2d971dcfdd9a3390f896d46b7 /src/xmpp_stream_out.erl | |
parent | Ignore unexpected events (diff) |
Fix some corner cases while re-reading RFC6120
Diffstat (limited to 'src/xmpp_stream_out.erl')
-rw-r--r-- | src/xmpp_stream_out.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/xmpp_stream_out.erl b/src/xmpp_stream_out.erl index 3dcecf6f..9ac4934d 100644 --- a/src/xmpp_stream_out.erl +++ b/src/xmpp_stream_out.erl @@ -333,8 +333,8 @@ handle_info({'$gen_event', {xmlstreamerror, Reason}}, #{lang := Lang}= State) -> Err = case Reason of <<"XML stanza is too big">> -> xmpp:serr_policy_violation(Reason, Lang); - _ -> - xmpp:serr_not_well_formed() + {_, Txt} -> + xmpp:serr_not_well_formed(Txt, Lang) end, send_pkt(State1, Err) end); @@ -520,7 +520,7 @@ process_features(#stream_features{sub_els = Els} = StreamFeatures, send_pkt(State1, xmpp:serr_policy_violation(Txt, Lang)); #starttls{required = true} when not TLSAvailable and not Encrypted -> Txt = <<"Use of STARTTLS forbidden">>, - send_pkt(State1, xmpp:serr_policy_violation(Txt, Lang)); + send_pkt(State1, xmpp:serr_unsupported_feature(Txt, Lang)); #starttls{} when TLSAvailable and not Encrypted -> State2 = State1#{stream_state => wait_for_starttls_response}, send_pkt(State2, #starttls{}); |