anchor.diff:  
   init([]) ->
       self() ! acquire_initial_status,
  +    timer:send_interval(?LOG_INTERVAL, log),
       {ok, #state{nodes=dict:new()}}.
   
   handle_call(get_nodes, _From, #state{nodes=Nodes} = State) ->
  
positive.code:     Nodes = lists:foldl(fun ({Node, Status}, Dict) ->
                                  update_status(Node, Status, Dict)
                          end, NodeDict, Replies),
      ?log_info("Got initial status ~p~n", [Nodes]),
      {noreply, State#state{nodes=Nodes}};
  
  handle_info(Info, State) ->
      ?log_warning("Unexpected message ~p in state",
  
negative.code: -module(ns_doctor).
  
  -define(STALE_TIME, 5000000). % 5 seconds in microseconds
  -define(LOG_INTERVAL, 60000). % How often to dump current status to the logs
  
  -include("ns_common.hrl").
  
  