anchor.diff:  
   handle_call({get_user, KeyID}, _From, State=#state{riakc_pid=RiakcPid}) ->
       {reply, do_get_user(KeyID, RiakcPid), State};
  +
   handle_call({create_user, UserName}, _From, State=#state{riakc_pid=RiakcPid}) ->
       {reply, do_create_user(UserName, RiakcPid), State};
  +
   handle_call({get_buckets, KeyID}, _From, State=#state{riakc_pid=RiakcPid}) ->
       {reply, do_get_buckets(KeyID, RiakcPid), State};
  -%% TODO:
  -%% move this into do_create_bucket
  +
   handle_call({create_bucket, KeyID, BucketName}, _From, State=#state{riakc_pid=RiakcPid}) ->
       {reply, do_create_bucket(KeyID, BucketName, RiakcPid), State};
  +
   handle_call({delete_bucket, KeyID, BucketName}, _From, State=#state{riakc_pid=RiakcPid}) ->
  -    {reply, do_delete_bucket(KeyID, BucketName, RiakcPid), State}.
  +    {reply, do_delete_bucket(KeyID, BucketName, RiakcPid), State};
  +
  +handle_call({put_object, KeyID, BucketName, Key, Value, Metadata},
  +                   _From, State=#state{riakc_pid=RiakcPid}) ->
  +    {reply, do_put_object(KeyID, BucketName, Key, Value, Metadata, RiakcPid), State}.
   
   handle_cast(_Msg, State) ->
       {noreply, State}.
  
positive.code:     UpdatedUser = User#rs3_user{buckets=UpdatedBuckets},
      do_save_user(UpdatedUser, RiakcPid).
  
  do_save_user(User, RiakcPid) ->
      UserObj = riakc_obj:new(?USER_BUCKET, list_to_binary(User#rs3_user.key_id),User),
      ok = riakc_pb_socket:put(RiakcPid, UserObj),
      ok.
  
  
negative.code: %% If there is only one namespace
  %% for buckets then do we need
  %% the KeyID here?
  delete_bucket(KeyID, BucketName) ->
      gen_server:call(?MODULE, {delete_bucket, KeyID, BucketName}).
  
  %% TODO:
  %% What are we actually doing with
  %% the KeyID?
  put_object(KeyID, BucketName, Key, Val, Metadata) ->
      gen_server:call(?MODULE, {put_object, KeyID, BucketName, Key, Val, Metadata}).
  
  do_create_user(UserName, RiakcPid) ->
      %% TODO: Is it outside the scope
  