commit b31f0900b57b7473a8f84c7b74f73381dcff2818
author Nobuaki Sukegawa <nsuke@apache.org> Sun Nov 01 17:00:34 2015 +0900
committer Nobuaki Sukegawa <nsuke@apache.org> Tue Nov 03 22:02:55 2015 +0900
tree 7ef6c5c8d52ab9d8cf136c8bef3e0ae65b85c171
parent 36c357a90eeda250d1c7eb1d419dbe9010e0d65f

THRIFT-338 Compact Protocol in Erlang
Client: Erlang
Patch: Nobuaki Sukegawa

This closes #338

test/erl/src/test_thrift_server.erl

diff --git a/test/erl/src/test_thrift_server.erl b/test/erl/src/test_thrift_server.erl
index 884eb9e..f504c73 100644
--- a/test/erl/src/test_thrift_server.erl
+++ b/test/erl/src/test_thrift_server.erl
@@ -55,7 +55,8 @@
                         ,{keyfile,  "../keys/server.key"}
                     ]},
                 Opts#options{server_opts = [{ssltransport, true} | [SslOptions | Opts#options.server_opts]]};
-            "--protocol=" ++ _ -> Opts;
+            "--protocol=" ++ Proto ->
+                Opts#options{server_opts = [{protocol, list_to_atom(Proto)} | Opts#options.server_opts]};
             _Else ->
                 erlang:error({bad_arg, Head})
         end,