anchor.diff:      handle_oidc_token(oidcc:retrieve_token(AuthCode, OpenIdProviderId), ReqMap);
   retreive_oidc_token_if_state_fits(false, ReqMap) ->
       Desc = <<"the returned state did not fit this session">>,
  -    show_error_and_close_sessino(Desc,  ReqMap).
  +    show_error_and_close_session(Desc,  ReqMap).
   
   handle_oidc_token({ok, Token}, #{session:=Session}=ReqMap) ->
       {ok, OpenIdProviderId} = tts_session:get_oidc_provider(Session),
  
positive.code: 
  
  login_user_with_authcode(#{qs := #{error := Error }} = ReqMap) ->
      show_error_and_close_sessino(Error, ReqMap);
  login_user_with_authcode(#{qs := #{state:=OidcState}, session := Session} =
                           ReqMap) ->
      retreive_oidc_token_if_state_fits(tts_session:is_oidc_state(OidcState,Session),
  
negative.code:     redirect_to(user_page,ReqMap);
  set_valid_user(_,ReqMap) ->
      Error = <<"Invalid/Unknown User">>,
      show_error_and_close_session(Error, ReqMap).
  
  redirect_to(auth_server, #{op_id := OpenIdProvider, session:=Session}) ->
      {ok, OidcState} = tts_session:get_oidc_state(Session),
  