diff options
| author | Lukas Larsson <lukas@erlang.org> | 2021-04-12 11:48:36 +0200 |
|---|---|---|
| committer | Lukas Larsson <lukas@erlang.org> | 2021-04-12 11:54:09 +0200 |
| commit | 8194e2095309e02ee007d67c31da86951bb5be48 (patch) | |
| tree | 12be220efca9784e39013a58dfa78ff913a5fb24 | |
| parent | c3d6771ba1131b06d6f042014d51282cc36e61ba (diff) | |
| download | erlang-8194e2095309e02ee007d67c31da86951bb5be48.tar.gz | |
kernel: Warn when invalid -(s)name is given
| -rw-r--r-- | lib/kernel/src/erl_distribution.erl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/kernel/src/erl_distribution.erl b/lib/kernel/src/erl_distribution.erl index a0d55d62f6..38f493b7a6 100644 --- a/lib/kernel/src/erl_distribution.erl +++ b/lib/kernel/src/erl_distribution.erl @@ -109,6 +109,10 @@ do_start_link([{Arg,Flag}|T]) -> ?LOG_WARNING("Multiple -~p given to erl, using the first, ~p", [Arg, Name]), start_link([list_to_atom(Name),Flag|ticktime()], true, net_sup); + {ok,[Invalid|_]} -> + ?LOG_ERROR("Invalid -~p given to erl, ~ts", + [Arg, lists:join(" ",Invalid)]), + do_start_link(T); _ -> do_start_link(T) end; |