anchor.diff:      {reply, unknown_request, State}.
   
   handle_cast(inspect, #state{interval = Interval} = State) ->
  -    {ok, Active} = inspect_fun(Interval),
  -    {noreply, State#state{active = Active}};
  +    {ok, Active, TRef} = inspect_fun(Interval),
  +    {noreply, State#state{active = Active, tref = TRef}};
   
   handle_cast(_Msg, State) ->
       {noreply, State}.
  
positive.code:     [Node2|_] = string:tokens(Node1, "@:"),
      Node3 = list_to_atom(Node2),
  
      {ok, Active} = inspect_fun(0, false),
      Ret = case lists:keyfind(Node3, 1, Active) of
                {_,_Host,_Port, NumOfActive,_Workers} when NumOfActive > 0 ->
                    active;
  
negative.code:     {stop, {unhandled_message, _Info}, State}.
  
  
  terminate(_Reason, #state{tref = TRef} = _State) ->
      timer:cancel(TRef),
      ok.
  
  
  