anchor.diff:  %% @private
   -spec handle_info(term(), #state{}) -> {noreply, #state{}}.
   
  -handle_info(random_promotion, #state{myself=Myself0}=State0) ->
  -    lager:info("Random promotion for node ~p", [Myself0]),
  -    State = move_random_peer_from_passive_to_active(State0),
  +handle_info(random_promotion, #state{myself=Myself0,
  +                                     active=Active0,
  +                                     reserved=Reserved0,
  +                                     max_active_size=MaxActiveSize0}=State0) ->
  +    State = case is_full({active, Active0, Reserved0}, MaxActiveSize0) of
  +                true ->
  +                    %% Do nothing if the active view is full.
  +                    State0;
  +                false ->
  +                    lager:info("Random promotion for node ~p", [Myself0]),
  +                    move_random_peer_from_passive_to_active(State0)
  +            end,
   
       %% Schedule periodic random promotion.
       schedule_random_promotion(),
  
positive.code:             #state{myself=Myself,
                     active=Active,
                     passive=Passive,
                     connections=Connections}=State) ->
      Exchange0 = %% Myself.
                  [Myself] ++
  
  
negative.code:     Exchange = lists:usort(Exchange0),
  
      %% Select random member of the active list.
      State = case select_random(Active, [Myself]) of
                  undefined ->
                      State0;
                  Random ->
                      %% Trigger connection.
                      Connections = maybe_connect(Random, Connections0),
  
                      %% Forward shuffle request.
                      do_send_message(Random,
                                      {shuffle, Exchange, arwl(), Myself},
                                      Connections),
  
                      State0#state{connections=Connections}
              end,
  
      %% Schedule periodic maintenance of the passive view.
      schedule_passive_view_maintenance(),
  