From 0b281746c20fdc77fa0a825b0000ff751bbb92d9 Mon Sep 17 00:00:00 2001
From: Alexey Shchepin <alexey@process-one.net>
Date: Fri, 1 Dec 2006 17:19:04 +0000
Subject: [PATCH] * src/ejabberd_receiver.erl: Bugfix

SVN Revision: 688
---
 ChangeLog                 | 4 ++++
 src/ejabberd_receiver.erl | 7 ++++++-
 2 files changed, 10 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 1d24c8c39..3dd7518a1 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2006-12-01  Alexey Shchepin  <alexey@sevcom.net>
+
+	* src/ejabberd_receiver.erl: Bugfix
+
 2006-11-30  Mickael Remond  <mickael.remond@process-one.net>
 
 	* src/mod_proxy65/mod_proxy65_services.erl: We now try to get the
diff --git a/src/ejabberd_receiver.erl b/src/ejabberd_receiver.erl
index dfa03fd4e..aa39dfbdc 100644
--- a/src/ejabberd_receiver.erl
+++ b/src/ejabberd_receiver.erl
@@ -117,7 +117,12 @@ handle_call({starttls, TLSSocket}, _From,
 	    #state{xml_stream_state = XMLStreamState,
 		   c2s_pid = C2SPid,
 		   max_stanza_size = MaxStanzaSize} = State) ->
-    xml_stream:close(XMLStreamState),
+    if
+	XMLStreamState /= undefined ->
+	    xml_stream:close(XMLStreamState);
+	true ->
+	    ok
+    end,
     NewXMLStreamState = xml_stream:new(C2SPid, MaxStanzaSize),
     NewState = State#state{socket = TLSSocket,
 			   sock_mod = tls,