anchor.diff:      %% Update the state...
       NewState = State#state {buffers = [CurrentBuffer | Buffers]},
   
  -    %% Possibly dump buffer to a new segment...
  -    case mi_buffer:filesize(CurrentBuffer) > ?ROLLOVER_SIZE(State) of
  +    %% Possibly dump buffer to a new segment. 
  +    case mi_buffer:filesize(CurrentBuffer) > State#state.buffer_rollover_size of
           true ->
               #state { next_id=NextID } = NewState,
               
  
positive.code:     gen_server:cast(ServerPid, {buffer_to_segment, Buffer, SegmentWO}).
  
  init([Root]) ->
      %% Load from disk...
      filelib:ensure_dir(join(Root, "ignore")),
      io:format("Loading merge_index from '~s'~n", [Root]),
  
negative.code:             
              NewState1 = NewState#state {
                  buffers=[NewBuffer|NewState#state.buffers],
                  next_id=NextID + 1,
                  buffer_rollover_size = semi_random_rollover_size()
              },
              {reply, ok, NewState1};
          false ->
  