Namdak Tonpa 6 years ago
parent
commit
867ffededc
5 changed files with 6 additions and 6 deletions
  1. 1 1
      include/mad.hrl
  2. BIN
      mad
  3. 3 3
      src/mad_git.erl
  4. 1 1
      src/mad_hooks.erl
  5. 1 1
      src/provide/mad_repl.erl

+ 1 - 1
include/mad.hrl

@@ -1 +1 @@
--define(VERSION,"e1aeb1").
+-define(VERSION,"5be2f0").

BIN
mad


+ 3 - 3
src/mad_git.erl

@@ -3,7 +3,7 @@
 
 deps(_Params) ->
     case mad_utils:configs() of
-      {error, _ } -> {error, <<"rebar.config error">>};
+      {error,E} -> {error,E};
       {ok,{ Cwd, ConfigFile, Conf }} ->
     case mad_utils:get_value(deps, Conf, []) of
         [] -> {ok,[]};
@@ -35,7 +35,7 @@ fetch(Cwd, Config, ConfigFile, [H|T]) ->
 get_repo([]) -> {error,"Repository unspecified."};
 get_repo([Name|_]) ->
     case mad_utils:configs() of
-      {error,_} -> {error,<<"rebar.config error while retriving deps">>};
+      {error,E} -> {error,E};
       {ok,{ Cwd, File, Conf }} ->
     Res = case string:tokens(Name,"/") of
          [Org, Rep] -> {ok,Rep,lists:concat(["https://github.com/",Org,"/",Rep])};
@@ -144,7 +144,7 @@ upd(Config,[F|T]) ->
 
 up(Params) ->
   case mad_utils:configs() of
-       {error,_} -> {error,<<"rebar.config error while up.">>};
+       {error,E} -> {error,E};
        { _Cwd,_ConfigFileName,Config } ->
           List = case Params of
                  [] -> [ F || F <- mad_repl:wildcards(["deps/*"]), filelib:is_dir(F) ];

+ 1 - 1
src/mad_hooks.erl

@@ -5,7 +5,7 @@
 -spec run_hooks(pre|post, atom()) -> any().
 run_hooks(Type, Command) ->
     case mad_utils:configs() of
-         {error,_} -> {error, <<"rebar.config error while hooks.">>};
+         {error,E} -> {error,E};
          {ok,{_Cwd, _ConfigFile, Config}} ->
              Dir = mad_utils:cwd(),
              run_hooks(Dir, Type, Command, Config) end.

+ 1 - 1
src/provide/mad_repl.erl

@@ -97,7 +97,7 @@ cwd() -> case  file:get_cwd() of {ok, Cwd} -> Cwd; _ -> "." end.
 
 sh(Params) ->
     case mad_utils:configs() of
-         {error,_} -> {error,<<"rebar.config error while shell.">>};
+         {error,E} -> {error,E};
     {ok,{ _Cwd,_ConfigFileName,_Config }} ->
     SystemPath = filelib:wildcard(code:root_dir() ++ "/lib/{"
               ++ string:join([atom_to_list(X)||X<-mad_repl:system()],",") ++ "}-*/ebin"),