anchor.diff:      after Timeout ->
           config_pull(1)
       end,
  -    NodesNow = nodes_actual_proper(),
  -    case NodesNow =:= Nodes of
  -        true  -> ok;
  -        false -> gen_event:notify(ns_node_disco_events,
  -                                  {ns_node_disco_events, Nodes, NodesNow})
  -    end,
       ?MODULE:loop(NodesNow).
   
   % --------------------------------------------------
  
positive.code: %
  
  init() ->
      % See: http://osdir.com/ml/lang.erlang.general/2004-04/msg00155.html
      inet_db:set_lookup([dns]),
      nodes_wanted_updated(),
      ok = net_kernel:monitor_nodes(true),
      % the ns_node_disco_conf_events gen_event handler will inform
  
negative.code: % --------------------------------------------------
  
  loop(Nodes) ->
      NodesNow = nodes_actual_proper(),
      case NodesNow =:= Nodes of
          true  -> ok;
          false -> gen_event:notify(ns_node_disco_events,
                                    {ns_node_disco_events, Nodes, NodesNow})
      end,
      Timeout = 5000 + trunc(random:uniform() * 55000),
      receive
          {nodeup, Node} ->
  