From bc118986b70cc3133133b21ab9d176dba2b3d9b7 Mon Sep 17 00:00:00 2001
From: Alexey Shchepin <alexey@process-one.net>
Date: Fri, 23 Mar 2012 11:04:26 +0200
Subject: [PATCH] Added missed tls:recv_data/2

---
 src/tls/tls.erl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/tls/tls.erl b/src/tls/tls.erl
index 84a0d4737..fe460c279 100644
--- a/src/tls/tls.erl
+++ b/src/tls/tls.erl
@@ -33,6 +33,7 @@
 	 tcp_to_tls/2, tls_to_tcp/1,
 	 send/2,
 	 recv/2, recv/3,
+         recv_data/2,
 	 setopts/2,
 	 sockname/1, peername/1,
 	 controlling_process/2,
@@ -176,6 +177,9 @@ recv(#tlssock{tcpsock = TCPSocket, tlsport = Port} = TLSSock,
             {error, binary_to_list(Error)}
     end.
 
+recv_data(TLSSock, Packet) ->
+    recv_data(TLSSock, Packet, 0).
+
 recv_data(TLSSock, Packet, Length) ->
     case catch recv_data1(TLSSock, Packet, Length) of
 	{'EXIT', Reason} ->