@@ -1 +1 @@
--define(VERSION,"7c7e76").
+-define(VERSION,"670539").
@@ -50,6 +50,8 @@ return(true) -> 1;
return(false) -> 0;
return(X) -> X.
+host() -> Host = try {ok,H} = inet:gethostname(), H catch _:_ -> <<>> end.
+
info(Format) -> io:format(lists:concat([Format,"\r"])).
info(Format,Args) -> io:format(lists:concat([Format,"\r"]),Args).
@@ -27,7 +27,7 @@ parse_applist(AppList) ->
[ list_to_atom(R) || R <-Res ] -- disabled().
load_config() ->
- Config = wildcards(["sys.config"]),
+ Config = wildcards(["sys.config",lists:concat(["etc/",mad:host(),"/sys.config"])]),
Apps = case Config of
[] -> case mad_repl:load_file("sys.config") of
{error,_} -> [];