anchor.diff:  get(Pid, Table, Key, Options)
     when is_pid(Pid), (is_binary(Table) orelse is_list(Table)),
          is_list(Key), is_list(Options) ->
  -    Message = #tsgetreq{table   = iolist_to_binary(Table),
  -                        key     = Key,
  -                        timeout = proplists:get_value(timeout, Options)},
  +    Message = #tsgetreq{table  =convert_to_binary(Table),
  +                        key    =Key,
  +                        timeout=proplists:get_value(timeout, Options)},
   
       case server_call(Pid, Message) of
           {error, {_NotFoundErrCode, <<"notfound">>}} ->
  
positive.code: stream_list_keys(Pid, Table, Options)
    when is_pid(Pid), (is_binary(Table) orelse is_list(Table)), is_list(Options) ->
      ReqTimeout = proplists:get_value(timeout, Options),
      Req = #tslistkeysreq{table = iolist_to_binary(Table),
                           timeout = ReqTimeout},
      ReqId = riakc_pb_socket:mk_reqid(),
      gen_server:call(Pid, {req, Req, ?DEFAULT_PB_TIMEOUT, {ReqId, self()}}, infinity).
  
  
negative.code: query_common(Pid, Query, Interpolations, Cover)
    when is_pid(Pid), is_list(Query) ->
      Message = riakc_ts_query_operator:serialize(
                  convert_to_binary(Query), Interpolations),
      Response = server_call(Pid, Message#tsqueryreq{cover_context = Cover}),
      riakc_ts_query_operator:deserialize(Response).
  
  