diff options
| author | Badlop <badlop@process-one.net> | 2010-06-18 12:07:08 +0200 |
|---|---|---|
| committer | Badlop <badlop@process-one.net> | 2010-06-18 21:24:51 +0200 |
| commit | 4fd7ec27f5b81726ded44c27475a1133885d8f44 (patch) | |
| tree | 7fc77c7db363e85aded241755103ad32934ab9d3 /src/tls | |
| parent | Improve handle of inet:gethostbyname return (diff) | |
OTP doc says the Command in the open_port spawn tuple must be string()
Diffstat (limited to 'src/tls')
| -rw-r--r-- | src/tls/tls.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/tls/tls.erl b/src/tls/tls.erl index 17bd8f286..2b3359aef 100644 --- a/src/tls/tls.erl +++ b/src/tls/tls.erl @@ -74,7 +74,7 @@ init([]) -> ok -> ok; {error, already_loaded} -> ok end, - Port = open_port({spawn, tls_drv}, [binary]), + Port = open_port({spawn, "tls_drv"}, [binary]), Res = port_control(Port, ?SET_CERTIFICATE_FILE_ACCEPT, "./ssl.pem" ++ [0]), case Res of <<0>> -> @@ -120,7 +120,7 @@ tcp_to_tls(TCPSocket, Options) -> ok -> ok; {error, already_loaded} -> ok end, - Port = open_port({spawn, tls_drv}, [binary]), + Port = open_port({spawn, "tls_drv"}, [binary]), Flags = case lists:member(verify_none, Options) of true -> @@ -252,7 +252,7 @@ test() -> ok -> ok; {error, already_loaded} -> ok end, - Port = open_port({spawn, tls_drv}, [binary]), + Port = open_port({spawn, "tls_drv"}, [binary]), ?PRINT("open_port: ~p~n", [Port]), PCRes = port_control(Port, ?SET_CERTIFICATE_FILE_ACCEPT, "./ssl.pem" ++ [0]), |