[thrift] erlang: dialyzer bug: tSocket reading of send_timeout preference

Reviewed By: cpiro

Test Plan: make dialyzer

Revert Plan: sure


git-svn-id: https://svn.apache.org/repos/asf/incubator/thrift/trunk@665526 13f79535-47bb-0310-9956-ffa450edef68
diff --git a/lib/erl/src/transport/tSocket.erl b/lib/erl/src/transport/tSocket.erl
index 96b7aa9..5f16ded 100644
--- a/lib/erl/src/transport/tSocket.erl
+++ b/lib/erl/src/transport/tSocket.erl
@@ -76,7 +76,7 @@
                {reuseaddr, true},
                {nodelay, true},
                {send_timeout, case application:get_env(thrift, socket_send_timeout) of
-                                  Millis when is_integer(Millis), Millis > 0 -> Millis;
+                                  {ok, Millis} when is_integer(Millis), Millis > 0 -> Millis;
                                   _Else -> 5000
                               end}
               ],