summaryrefslogtreecommitdiffstats
path: root/src/ct_helper.erl
diff options
context:
space:
mode:
Diffstat (limited to 'src/ct_helper.erl')
-rw-r--r--src/ct_helper.erl6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/ct_helper.erl b/src/ct_helper.erl
index 58fff09..8a08a50 100644
--- a/src/ct_helper.erl
+++ b/src/ct_helper.erl
@@ -144,6 +144,7 @@ get_remote_pid_tls(Socket) ->
TLSPid = get_remote_pid_tcp(ssl:sockname(Socket)),
get_tls_state(TLSPid).
+-ifdef(OTP_RELEASE).
-if(?OTP_RELEASE >= 22).
get_tls_state(TLSPid) ->
{_, #state{connection_env=#connection_env{user_application={_, UserPid}}}} = sys:get_state(TLSPid),
@@ -153,6 +154,11 @@ get_tls_state(TLSPid) ->
{_, #state{user_application={_, UserPid}}} = sys:get_state(TLSPid),
UserPid.
-endif.
+-else.
+get_tls_state(TLSPid) ->
+ {_, #state{user_application={_, UserPid}}} = sys:get_state(TLSPid),
+ UserPid.
+-endif.
%% @doc Ignore crashes from Pid occuring in M:F/A.