anchor.diff:  %% Silently ignores the call if the match is not there
   -spec match_delete(match_stream:match_id()) -> ok.
   match_delete(MatchId) ->
  -  make_call(write, {delete, <<"match-", MatchId/binary>>}),
  -  make_call(write, {delete_events, MatchId}).
  +  make_call(write_once, {delete, <<"match-", MatchId/binary>>}),
  +  make_call(write_once, {delete_events, MatchId}).
   
   %% @doc Deletes an user.
   %% Silently ignores the call if the user is not there
  
positive.code: %% =================================================================================================
  -spec make_call(read|write, tuple()) -> ok | not_found | match_stream:match().
  make_call(Type, Call) ->
    Module =
      case Type of
        read -> match_stream_db_reader;
        write -> match_stream_db_writer
      end,
    Module:make_call(Call).
negative.code: %% @throws not_found
  -spec event_log(match_stream:event()) -> ok.
  event_log(Event) ->
    make_call(write_once, {log, Event}).
  
  %% @doc Returns match events
  -spec match_history(match_stream:match_id()) -> [match_stream:event()].
  