anchor.diff:      ok = tts_session:clear_oidc_state_nonce(Session),
       VerToken = oidcc:parse_and_validate_token(Token,OpenIdProviderId ,OidcNonce),
       try_to_set_user(VerToken, ReqMap);
  -    %% redirect_to(user_page, Req, State);
   handle_oidc_token({error, Error}, ReqMap) ->
  -    show_error_page(Error, ReqMap).
  +    show_error_and_close_sessino(Error, ReqMap).
   
   
   show_select_page(ReqMap) ->
  
positive.code: 
  
  login_user_with_authcode(#{qs := #{error := Error }} = ReqMap) ->
      show_error_page(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:     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).
  
  handle_oidc_token({ok, Token}, #{session:=Session}=ReqMap) ->
      {ok, OpenIdProviderId} = tts_session:get_oidc_provider(Session),
  