anchor.diff:                                   token = binary_to_list(maps:get(<<"Token">>, RMap))},
               lager:notice("~p: fetched new credentials that expire ~p.",
                            [?MODULE, Credentials#creds.expiration]),
  -            insert_credentials(Credentials),
  +            insert_credentials(encode(Credentials)),
               Credentials;
           _ ->
               error
  
positive.code:                         {read_concurrency, true}, 
                          {write_concurrency, false}]),
      ets:give_away(Tid, whereis(?MODULE), []).
  
negative.code: 
  -spec get_credentials() -> #creds{}.
  get_credentials() ->
      try ets:lookup(nook_cred, creds) of
          [#creds{} = C] ->
              Credentials = decode(C),
              Now = calendar:universal_time(),
              case (ec_date:parse(Credentials#creds.expiration) > Now) of
                  true ->
                      Credentials;
                  false ->
  