anchor.diff:  unique_id_62() ->
       Rand = crypto:sha(term_to_binary({make_ref(), now()})),
       <<I:160/integer>> = Rand,
  -    integer_to_list(I, 62).
  +    integer_to_list0(I, 62).
  
positive.code: count(Conn, Type, Conditions) ->
      length(find(Conn, Type, Conditions, 0, 0, 0, 0)).
  
  counter(Conn, Id) ->
      {error, notimplemented}.
  
  incr(Conn, Id) ->
      incr(Conn, Id, 1).
  incr(Conn, Id, Count) ->
      {error, notimplemented}.
  
  
  delete(Conn, Id) ->
      {Type, Bucket, Key} = infer_type_from_id(Id),
      riakc_pb_socket:delete(Conn, Bucket, Key).
  
  save_record(Conn, Record) ->
  
negative.code:     lists:reverse(Acc);
  find_acc(Conn, Prefix, [Id | Rest], Acc) ->
      case find(Conn, Prefix ++ binary_to_list(Id)) of
          {error, _Reason} ->
              find_acc(Conn, Prefix, Rest, Acc);
  
          Value ->
  