1. Andreas Stenius
  2. gen_tcpd

Commits

Oscar Hellström  committed 9a2d80c

Fix typo.

  • Participants
  • Parent commits 8b2f0b8
  • Branches default

Comments (0)

Files changed (1)

File src/gen_tcpd.erl

View file
  • Ignore whitespace
 init([Type, Mod, Args, Port, Options]) ->
 	Acceptors = proplists:get_value(acceptors, Options, 1),
 	Timeout = proplists:get_value(ssl_accept_timeout, Options, infinity),
-	SocketOptions = proplists:get_value(scoket_options, Options, []),
+	SocketOptions = proplists:get_value(socket_options, Options, []),
 	case Mod:init(Args) of
 		{ok, CState} ->
 			case listen(module(Type), Port, SocketOptions) of
 sock_port({Mod, Socket}) ->
 	element(2, Mod:port(Socket)).
 
-check_options([{scoket_options, List} | T]) when is_list(List) ->
+check_options([{socket_options, List} | T]) when is_list(List) ->
 	check_options(T);
 check_options([{acceptors, N} | T]) when is_integer(N), N > 0 ->
 	check_options(T);