|
@@ -31,6 +31,7 @@
|
|
|
-export([controlling_process/2]).
|
|
|
-export([peername/1]).
|
|
|
-export([sockname/1]).
|
|
|
+-export([shutdown/2]).
|
|
|
-export([close/1]).
|
|
|
|
|
|
-type opts() :: [{backlog, non_neg_integer()}
|
|
@@ -166,6 +167,11 @@ peername(Socket) ->
|
|
|
sockname(Socket) ->
|
|
|
ssl:sockname(Socket).
|
|
|
|
|
|
+-spec shutdown(ssl:sslsocket(), read | write | read_write)
|
|
|
+ -> ok | {error, atom()}.
|
|
|
+shutdown(Socket, How) ->
|
|
|
+ ssl:shutdown(Socket, How).
|
|
|
+
|
|
|
-spec close(ssl:sslsocket()) -> ok.
|
|
|
close(Socket) ->
|
|
|
ssl:close(Socket).
|