anchor.diff:      Tests =
           [ t_get_client
           , t_get_realm
  -        , t_store_and_fetch
  +        , t_storage
           % TODO: Test storage errors
           ],
       Properties = [],
  
positive.code: -export(
      [ t_get_client/1
      , t_get_realm/1
      , t_store_and_fetch/1
      ]).
  
  
  
negative.code:     {some, Realm}   = hope_kv_list:get(Cfg, ?LIT_REALM),
      Realm = oauth1_authorization_request:get_realm(AuthReq).
  
  t_storage(Cfg) ->
      {some, AuthReq}    = hope_kv_list:get(Cfg, ?LIT_AUTH_REQ),
      {some, TmpTokenID} = hope_kv_list:get(Cfg, ?LIT_TMP_TOKEN_ID),
      {ok, ok}      = oauth1_authorization_request:store(AuthReq),
  