don't do an exit(normal)
git-svn-id: https://svn.apache.org/repos/asf/incubator/thrift/trunk@666440 13f79535-47bb-0310-9956-ffa450edef68
diff --git a/lib/alterl/src/thrift_socket_transport.erl b/lib/alterl/src/thrift_socket_transport.erl
index 4b1f723..70367d6 100644
--- a/lib/alterl/src/thrift_socket_transport.erl
+++ b/lib/alterl/src/thrift_socket_transport.erl
@@ -27,7 +27,7 @@
when is_binary(Data) ->
gen_tcp:send(Socket, Data).
-read(D = #data{socket=Socket, recv_timeout=Timeout}, Len)
+read(#data{socket=Socket, recv_timeout=Timeout}, Len)
when is_integer(Len), Len >= 0 ->
gen_tcp:recv(Socket, Len, Timeout).
@@ -36,5 +36,4 @@
ok.
close(#data{socket = Socket}) ->
- gen_tcp:close(Socket),
- exit(normal).
+ gen_tcp:close(Socket).