anchor.diff:      Res =
           try streaming_inner(F, HTTPRes, LastRes)
           catch exit:normal ->
  -                ?log_info("closing streaming socket~n", []),
  +                ale:info(?MENELAUS_LOGGER, "closing streaming socket~n"),
                   HTTPRes:write_chunk(""),
                   exit(normal)
           end,
       receive
           {notify_watcher, _} -> ok;
           _ ->
  -            ?log_info("menelaus_web streaming socket closed by client"),
  +            ale:info(?MENELAUS_LOGGER,
  +                     "menelaus_web streaming socket closed by client"),
               exit(normal)
       after 25000 ->
           ok
  
positive.code:                              KF = case lists:keyfind(N, 1, NodeResp) of
                                        %% if reply is not list it is error report
                                        {_, Reply} when not is_list(Reply) ->
                                            ?log_info("Got error reply from ~p:~n~p", [N, Reply]),
                                            false;
                                        X -> X
                                    end,
  
negative.code:                                        end,
                                         Parent ! {Ref, done};
                                     {tcp_closed, Socket} ->
                                         ale:info(?MENELAUS_LOGGER,
                                                  "I have nobody to live for. Killing myself..."),
                                         exit(Parent, kill)
                                 end
                         end),
  