anchor.diff:              %% part of release packaging.
               application:set_env(riak_core, ring_creation_size, 64),
               application:set_env(riak_kv, storage_backend, riak_kv_memory_backend),
  -            %% Create a fresh ring for the test
  -            Ring = riak_core_ring:fresh(),
  -            riak_core_ring_manager:set_ring_global(Ring),
   
               %% Start riak_kv
               timer:sleep(500);
  
positive.code:     TestNode = list_to_atom("testnode" ++ integer_to_list(element(3, now()))),
      net_kernel:start([TestNode, shortnames]),
      do_dep_apps(start, dep_apps()),
      ok.
  
  cleanup(_) ->
  
negative.code:                %% Create objects in bucket
                 GeneratedKeys = [list_to_binary(integer_to_list(X)) || X <- lists:seq(1, ObjectCount)],
                 [ok = Client:put(riak_object:new(Bucket, Key, <<"val">>)) || Key <- GeneratedKeys],
  
                 %% Set the expected output based on if a
                 %% key filter is being used or not.
                 case KeyFilter of
  