anchor.diff:      TestSession = watts_session:start_link(TestToken),
   
       ProviderList = fun() ->
  -                             {ok, [ {<<"id">>, pid1} ]}
  +                             {ok, [ {<<"id">>, pid1},
  +                                    {<<"ID1">>, pid2},
  +                                    {<<"ID2">>, pid3}]}
                        end,
   
       RetrieveUserInfo = fun(_, _, _) ->
                                  {ok, #{sub => <<"sub">>}}
                          end,
  -    ProviderInfo = fun(_Pid) ->
  +    ProviderInfo = fun(<<"ID2">>) ->
  +                           {ok, #{
  +                                id => <<"ID2">>,
  +                                description => <<"a ready provider">>,
  +                                ready => true,
  +                                extra_config => #{priority => 5},
  +                                issuer => ?ISSUER_URL}};
  +                      (_) ->
                                {ok, #{
                                   id => <<"ID1">>,
                                   description => <<"info">>,
  
positive.code:     try
          ?assertEqual(true, watts:does_credential_exist(<<"id">>, Session)),
          ?assertEqual(true, watts:does_temp_cred_exist(<<"id">>, Session)),
          {ok, [#{id := <<"id">>}]} = watts:get_openid_provider_list(),
          ?assertEqual({ok, []}, watts:get_service_list_for(Session)),
          ?assertEqual({ok, []}, watts:get_credential_list_for(Session)),
          ?assertEqual({ok, <<"accesstoken">>}, watts:get_access_token_for(Session)),
  
negative.code:     {ok, {Session, _} = Meck} = start_meck(),
      try
          {ok, _} = watts:request_credential_for(<<"service">>, Session, []),
          {error, _} = watts:request_credential_for(<<"other_service">>, Session, []),
          {ok, #{result := oidc_login}} = watts:request_credential_for(
                                            <<"yet_another_service">>, Session, []),
          {error, _} = watts:request_credential_for(<<"error">>, Session, []),
          {error, _} = watts:request_credential_for(<<"bad">>, Session, [])
      after
  