|
|
@ -33,20 +33,16 @@ |
|
|
|
-export([shell/2]). |
|
|
|
|
|
|
|
shell(_Config, _AppFile) -> |
|
|
|
|
|
|
|
%% backwards way to say we only want this executed |
|
|
|
%% for the "top level" directory |
|
|
|
case is_deps_dir(rebar_utils:get_cwd()) of |
|
|
|
false -> |
|
|
|
true = code:add_pathz(ebin_dir()), |
|
|
|
|
|
|
|
user_drv:start(), |
|
|
|
|
|
|
|
%% this call never returns (until user quits shell) |
|
|
|
shell:server(false, false); |
|
|
|
|
|
|
|
true -> |
|
|
|
ok |
|
|
|
shell:server(false, false); |
|
|
|
true -> |
|
|
|
ok |
|
|
|
end, |
|
|
|
ok. |
|
|
|
|
|
|
@ -55,8 +51,8 @@ ebin_dir() -> |
|
|
|
|
|
|
|
is_deps_dir(Dir) -> |
|
|
|
case lists:reverse(filename:split(Dir)) of |
|
|
|
[_, "deps" | _] -> |
|
|
|
true; |
|
|
|
_V -> |
|
|
|
false |
|
|
|
[_, "deps" | _] -> |
|
|
|
true; |
|
|
|
_V -> |
|
|
|
false |
|
|
|
end. |