anchor.diff:  %% @end
   -spec delete_resource(ReqData::tuple(), State::string()) -> {string(), tuple(), string()}.
   delete_resource(ReqData, State) ->
  -    case openidc:authenticate_token("access_token", ReqData) of
  +    case openidc:authenticate_request(ReqData) of
           {error, Msg} -> {{halt, 403}, wrq:set_resp_body(Msg, ReqData), State};
           {ok, Token} ->
  -            % {true, wrq:set_resp_body(Token, ReqData), State}
               Id = id_from_path(ReqData),
               case delete_streams_with_user_id(Id) of
                   {error, {Code, Body}} ->
  
positive.code:     end.
  
  
  -spec replace_access_token(Username::string(), AccToken::string()) -> tuple().
  replace_access_token(Username, AccToken) ->
      case get_user_by_name(Username) of
          {error, Msg} -> {error, Msg};
          {ok, JSON}   ->
              UserJSON = lib_json:replace_field(JSON, "access_token", AccToken),
              Update   = lib_json:set_attr(doc, UserJSON),
              case api_help:update_doc(?INDEX, "user", Username, Update) of
                  {ok, NewJSON}         -> {ok, NewJSON};
  
negative.code:          process_post/2,
           process_auth_request/2,
           delete_streams_with_user_id/1,
           replace_token/3,
           user_is_new/1,
           store_user/3,
           get_user_by_name/1]).
  