anchor.diff:  %%--------------------------------------------------------------------
   init(Args) ->
     Type = proplists:get_value(node_type, Args, beehive_router),
  -
  +  
     timer:send_interval(timer:seconds(30), {update_node_stats}),
       
     % Get babysitter situated
  
positive.code: seed_nodes() -> [node(seed_pid())].
  
  seed_pid() -> hd(seed_pids([])).
  seed_pids(_State) -> 
    {ok, Plist} = gen_cluster:plist(?MODULE),
    Plist.
  
  is_a(Type) -> 
    gen_cluster:call(seed_pid(), {is_a, Type}).
  
negative.code:       throw({error, db});
      _ -> ok
    end,
    timer:send_interval(timer:minutes(1), {update_node_pings}),
    
    LocalHost = bh_host:myip(),
  