anchor.diff:  %%      key's logfile will be located.
   -spec get_preflist_from_key(key()) -> preflist().
   get_preflist_from_key(Key) ->
  -    ConvertedKey = case is_integer(Key) of
  -                    true ->
  -                        abs(Key);
  -                    false ->
  -                        HashedKey = riak_core_util:chash_key({?BUCKET, term_to_binary(Key)}),
  -                        abs(crypto:bytes_to_integer(HashedKey))
  -                end,
  +    ConvertedKey = convert_key(Key),
       %HashedKey = riak_core_util:chash_key({?BUCKET, term_to_binary(Key)}),
       get_primaries_preflist(ConvertedKey).
   
  
positive.code:     ?assertEqual([partition1, partition2, partition3],
                   remove_node_from_preflist(Preflist)).
  
  -endif.
  
negative.code:     end,
      lists:foldl(F, [], Preflist).
  
  %% @doc Convert key. If the key is integer(or integer in form of binary),
  %% directly use it to get the partition. If it is not integer, convert it
  %% to integer using hash.
  -spec convert_key(key()) -> non_neg_integer().
  convert_key(Key) ->
      case is_binary(Key) of
          true ->
              KeyInt = (catch list_to_integer(binary_to_list(Key))),
              case is_integer(KeyInt) of 
                  true -> abs(KeyInt);
                  false ->
                      HashedKey = riak_core_util:chash_key({?BUCKET, Key}),
                      abs(crypto:bytes_to_integer(HashedKey))
              end;
          false ->
              case is_integer(Key) of 
                  true ->
                      abs(Key);
                  false ->
                      HashedKey = riak_core_util:chash_key({?BUCKET, term_to_binary(Key)}),
                      abs(crypto:bytes_to_integer(HashedKey))
              end
      end.
  
  -ifdef(TEST).
  
  
  
  %% @doc Testing remove_node_from_preflist
  remove_node_from_preflist_test()->
  