/test/core/tokens.lisp
Lisp | 13 lines | 7 code | 6 blank | 0 comment | 0 complexity | 483b4a1270f2fde6d5521b7c0b41ee6c MD5 | raw file
Possible License(s): LGPL-3.0
- (in-package :oauth-test)
- (def-suite tokens :in oauth)
- (in-suite tokens)
- (test request-token.not-authorized-by-default
- (is (not (request-token-authorized-p (make-request-token)))))
- (test token-printer.deals-with-unbound-slots
- (finishes (write-to-string (make-request-token))))