diff --git a/mad b/mad index cc6ec63..ebf6462 100755 Binary files a/mad and b/mad differ diff --git a/src/mad.erl b/src/mad.erl index b9f07be..3431739 100644 --- a/src/mad.erl +++ b/src/mad.erl @@ -73,6 +73,10 @@ attach(_Cwd,_ConfigFileName,_Config,Params) -> % io:format("Attach Params: ~p~n",[Params]), mad_run:attach(Params). +clean(_Cwd,_ConfigFileName,_Config,Params) -> + io:format("Clean Params: ~p~n",[Params]), + mad_run:clean(Params). + stop(_Cwd,_ConfigFileName,_Config,Params) -> io:format("Stop Params: ~p~n",[Params]), mad_run:stop(Params). @@ -90,5 +94,5 @@ help() -> io:format(" params := [] | run params ~n"), io:format(" run := command [ help | options ]~n"), io:format(" cmd := app | lib | deps | compile | release | bundle~n"), - io:format(" start | stop | attach | repl ~n"), + io:format(" clean | start | stop | attach | repl ~n"), halt(). diff --git a/src/mad_run.erl b/src/mad_run.erl index 9ae01a9..13e0ecb 100644 --- a/src/mad_run.erl +++ b/src/mad_run.erl @@ -15,3 +15,5 @@ attach(_) -> io:format("to_erl .devbox/~n"). % use like $(mad attach) stop(_) -> ok. % TODO: stop box + +clean(_) -> [ file:delete(X) || X <- filelib:wildcard("{apps,deps}/*/ebin/**") ]. diff --git a/src/mad_utils.erl b/src/mad_utils.erl index c5b4241..2cfa8f1 100644 --- a/src/mad_utils.erl +++ b/src/mad_utils.erl @@ -74,6 +74,7 @@ atomize("lib"++_) -> lib; atomize("sta"++_) -> start; atomize("att"++_) -> attach; atomize("sto"++_) -> stop; +atomize("cle"++_) -> clean; atomize("rel"++_) -> release; atomize(Else) -> Else.