-module(ereproxy_log). -export([start_link/1, log/1]). -include("ereproxy_config.hrl"). start_link(CfgMod) -> case file:open((CfgMod:config())#cfg.log_file, [append]) of {ok, LogFile} -> Pid = spawn_link(?MODULE, log, [LogFile]), true = register(?MODULE, Pid), {ok, Pid}; Error -> error_logger:error_report( [{?MODULE, ?LINE}, Error]), {error, Error} end. %% log: write all message to logfile (w/ timestamp) log(FD) -> receive Msg -> io:format(FD, "~w~n", [{erlang:localtime(), Msg}]), log(FD) end.