Browse Source

config dump

Maxim Sokhatsky 10 years ago
parent
commit
6ade48403e
2 changed files with 4 additions and 3 deletions
  1. BIN
      mad
  2. 4 3
      src/mad_repl.erl

BIN
mad


+ 4 - 3
src/mad_repl.erl

@@ -7,9 +7,10 @@ load_config() ->
       [] -> skip;
       [] -> skip;
       File ->
       File ->
             {ok,[Apps]} = file:consult(File),
             {ok,[Apps]} = file:consult(File),
-            [  [ begin
-              io:format("~p : ~p = ~p~n",[App,K,V]),
-              application:set_env(App,K,V) end || {K,V} <- Cfg ]  || {App,Cfg} <- Apps]
+            [ begin io:format("~p:~n",[App]),
+              [ begin
+              io:format("\t{~p,~p}~n",[K,V]),
+              application:set_env(App,K,V) end || {K,V} <- Cfg ] end || {App,Cfg} <- Apps]
              end.
              end.
 
 
 load_apps([]) -> [application:start(A)||A<-mad_plan:applist()];
 load_apps([]) -> [application:start(A)||A<-mad_plan:applist()];