mirror of
https://github.com/correl/rebar.git
synced 2024-12-18 03:00:17 +00:00
Fix bug 294
This commit is contained in:
parent
926baa1c31
commit
b894682ba9
1 changed files with 22 additions and 0 deletions
|
@ -7,6 +7,7 @@
|
||||||
%% -------------------------------------------------------------------
|
%% -------------------------------------------------------------------
|
||||||
|
|
||||||
main(Args) ->
|
main(Args) ->
|
||||||
|
ok = start_epmd(),
|
||||||
%% Extract the args
|
%% Extract the args
|
||||||
{RestArgs, TargetNode} = process_args(Args, [], undefined),
|
{RestArgs, TargetNode} = process_args(Args, [], undefined),
|
||||||
|
|
||||||
|
@ -73,6 +74,27 @@ process_args([Arg | Rest], Acc, Opts) ->
|
||||||
process_args(Rest, [Arg | Acc], Opts).
|
process_args(Rest, [Arg | Acc], Opts).
|
||||||
|
|
||||||
|
|
||||||
|
start_epmd() ->
|
||||||
|
[] = os:cmd(epmd_path() ++ " -daemon"),
|
||||||
|
ok.
|
||||||
|
|
||||||
|
epmd_path() ->
|
||||||
|
ErtsBinDir = filename:dirname(escript:script_name()),
|
||||||
|
Name = "epmd",
|
||||||
|
case os:find_executable(Name, ErtsBinDir) of
|
||||||
|
false ->
|
||||||
|
case os:find_executable(Name) of
|
||||||
|
false ->
|
||||||
|
io:format("Could not find epmd.~n"),
|
||||||
|
halt(1);
|
||||||
|
GlobalEpmd ->
|
||||||
|
GlobalEpmd
|
||||||
|
end;
|
||||||
|
Epmd ->
|
||||||
|
Epmd
|
||||||
|
end.
|
||||||
|
|
||||||
|
|
||||||
nodename(Name) ->
|
nodename(Name) ->
|
||||||
case string:tokens(Name, "@") of
|
case string:tokens(Name, "@") of
|
||||||
[_Node, _Host] ->
|
[_Node, _Host] ->
|
||||||
|
|
Loading…
Reference in a new issue