anchor.diff:              gen_fsm:send_event(FSM_pid, {dw, Idx, ReqID});
           {newobj, NewObj} ->
               VC = riak_object:vclock(NewObj),
  -            ObjToStore = riak_object:set_vclock(NewObj,
  +            AMObj = enforce_allow_mult(NewObj, BProps),
  +            ObjToStore = riak_object:set_vclock(AMObj,
                                              vclock:prune(VC,PruneTime,BProps)),
               Val = term_to_binary(ObjToStore),
               case Mod:put(ModState, BKey, Val) of
  
positive.code:                     gen_fsm:send_event(FSM_pid, {fail, Idx, ReqID})
              end
      end.
  
  %% @private
  do_map(ClientPid,{map,FunTerm,Arg,_Acc},
  
negative.code: 
  %% @private
  % upon receipt of a handoff datum, there is no client FSM
  do_diffobj_put(BKey={Bucket,_}, DiffObj, 
         _StateData=#state{mod=Mod,modstate=ModState}) ->
      ReqID = erlang:phash2(erlang:now()),
      case syntactic_put_merge(Mod, ModState, BKey, DiffObj, ReqID) of
          {newobj, NewObj} ->
              AMObj = enforce_allow_mult(NewObj, riak_bucket:get_bucket(Bucket)),
              Val = term_to_binary(AMObj),
              Mod:put(ModState, BKey, Val);
          _ -> nop
      end.
  