anchor.diff:  
   yellow(info, {nodeup, Node}, Data) ->
       State = state(),
  -    {ok, JoinStatus} = join(State),
  -    cmkit:log({cmcluster, State, nodeup, Node, JoinStatus}),
  +    cmkit:log({cmcluster, State, nodeup, Node}),
       {next_state, State, Data};
   
   yellow(info, {nodedown, Node}, Data) ->
  
positive.code: 
  green(info, {nodeup, Node}, Data) ->
      State = state(),
      {ok, JoinStatus} = join(State),
      cmkit:log({cmcluster, State, nodeup, Node, JoinStatus}),
      {next_state, State, Data};
  
  green(info, {nodedown, Node}, Data) ->
  
negative.code:     gen_statem:start_link({local, ?MODULE}, ?MODULE, [], []).
  
  all_nodes() -> 
      {ok, [ gen_statem:call({cmcluster_server, N}, nodes) || N <- net_adm:world() ]}.
  
  init([]) ->
      net_kernel:monitor_nodes(true),
      net_adm:world(),
      case length(expected_nodes()) of
          1 -> 
              cmkit:log({cmcluster, green, standalone}),
              {ok, green, #data{}};
          _ -> 
  