summaryrefslogtreecommitdiff
path: root/src/xmpp_stream_out.erl
diff options
context:
space:
mode:
authorEvgeniy Khramtsov <ekhramtsov@process-one.net>2017-01-13 11:35:47 +0300
committerEvgeniy Khramtsov <ekhramtsov@process-one.net>2017-01-13 11:35:47 +0300
commit31491ebe16706f9cefcc27c6722fc6e8e2b013b1 (patch)
tree22ba4801ab6385c2d971dcfdd9a3390f896d46b7 /src/xmpp_stream_out.erl
parentIgnore 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.erl6
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{});