anchor.diff:  -export([start_link/0,
     store/3,
     index/3,
  -  msginfo/2
  +  msginfo/2,
  +  msgList/4
   ]).
   
   %% gen_server callbacks
  
positive.code:   {ok, Subject} = qredis:q(["HGET", lists:concat(["datasmart:users:", Ukey, ":inbox:subject"]), MessageID]),
    {ok, From} = qredis:q(["HGET", lists:concat(["datasmart:users:", Ukey, ":inbox:sender"]), MessageID]),
    {ok, IVec} = qredis:q(["HGET", lists:concat(["datasmart:users:", Ukey, ":inbox:ivec"]), MessageID]),
  
    Decompressed = doUncompress(Compressed),
    Encrypted = base64:decode_to_string(Decompressed),
    {ok, Dencrypted} = user_server:dencrypt(Ukey, IVec, Encrypted),
  
    {[
      {from, From},
      {subject, Subject},
      {body, Dencrypted},
      {meta, jiffy:decode(MetaJson)}
  
negative.code:   {reply, ok, State}.
  
  handle_cast({store, MessageID, Ukey, Message}, State) ->
    Now = ds_util:timestamp(),
    IVec = uuid:to_string(uuid:uuid3(uuid:uuid4(), uuid:to_string(uuid:uuid1()))),
    Body = proplists:get_value(body, Message),
    Copydrip = string:substr(Body, 1, 20),
  