aboutsummaryrefslogtreecommitdiffstats
path: root/lib/ssl/test/erl_make_certs.erl
diff options
context:
space:
mode:
authorPeter Lemenkov <[email protected]>2014-12-02 13:31:37 +0300
committerPeter Lemenkov <[email protected]>2014-12-15 21:05:05 +0300
commitbb7fb3c31d1939ab39fb14322d11a59bc34d8f42 (patch)
treeb3a37d800ac7d073723cd5cc02da09839e2b79e8 /lib/ssl/test/erl_make_certs.erl
parent5cbad390e971ff92a7fb1b71757041ff9edeb81a (diff)
downloadotp-bb7fb3c31d1939ab39fb14322d11a59bc34d8f42.tar.gz
otp-bb7fb3c31d1939ab39fb14322d11a59bc34d8f42.tar.bz2
otp-bb7fb3c31d1939ab39fb14322d11a59bc34d8f42.zip
Start using os:getenv/2 fun
See #535 Signed-off-by: Peter Lemenkov <[email protected]>
Diffstat (limited to 'lib/ssl/test/erl_make_certs.erl')
-rw-r--r--lib/ssl/test/erl_make_certs.erl10
1 files changed, 1 insertions, 9 deletions
diff --git a/lib/ssl/test/erl_make_certs.erl b/lib/ssl/test/erl_make_certs.erl
index daf4466f11..b534c0130e 100644
--- a/lib/ssl/test/erl_make_certs.erl
+++ b/lib/ssl/test/erl_make_certs.erl
@@ -204,7 +204,7 @@ issuer_der(Issuer) ->
Subject.
subject(undefined, IsRootCA) ->
- User = if IsRootCA -> "RootCA"; true -> user() end,
+ User = if IsRootCA -> "RootCA"; true -> os:getenv("USER", "test_user") end,
Opts = [{email, User ++ "@erlang.org"},
{name, User},
{city, "Stockholm"},
@@ -215,14 +215,6 @@ subject(undefined, IsRootCA) ->
subject(Opts, _) ->
subject(Opts).
-user() ->
- case os:getenv("USER") of
- false ->
- "test_user";
- User ->
- User
- end.
-
subject(SubjectOpts) when is_list(SubjectOpts) ->
Encode = fun(Opt) ->
{Type,Value} = subject_enc(Opt),