anchor.diff:      , timestamp        = Timestamp
       , nonce            = Nonce
   
  -    , temp_token       = {tmp, <<_/binary>>}=TmpToken
  +    , temp_token       = {tmp, <<_/binary>>}=TmpTokenID
       , verifier         = <<VerifierGivenBin/binary>>
   
       , host             = Host
  
positive.code:         end,
      ValidateTmpToken =
          fun (#request_validation_state{}=State1) ->
              case oauth1_credentials:fetch(TmpToken)
              of  {error, not_found} ->
                      {error, {unauthorized, token_invalid}}
              ;   {ok, TmpTokenCredentials} ->
                      State2 =
                          State1#request_validation_state
                          { creds_tmp = {some, TmpTokenCredentials}
                          },
                      {ok, State2}
              end
          end,
      ValidateVerifier =
          fun (#request_validation_state{}=State1) ->
              case oauth1_verifier:fetch(TmpToken)
              of  {error, not_found} ->
                      {error, {unauthorized, verifier_invalid}}
              ;   {ok, Verifier} ->
  
negative.code: 
                  , client_shared_secret = ClientSharedSecret
  
                  , token                = {some, TmpToken}
                  , verifier             = {some, Verifier}
                  , callback             = none
                  },
  