File tree Expand file tree Collapse file tree 2 files changed +10
-1
lines changed
http-easy-lib/http-easy/private
http-easy-test/net/http-easy Expand file tree Collapse file tree 2 files changed +10
-1
lines changed Original file line number Diff line number Diff line change 34
34
[make-session (->* []
35
35
[#:pool-config pool-config?
36
36
#:ssl-context (or/c #f ssl-client-context? (promise/c ssl-client-context?))
37
- #:cookie-jar (is-a?/c cookie-jar<%>)
37
+ #:cookie-jar (or/c #f ( is-a?/c cookie-jar<%>) )
38
38
#:proxies (listof proxy?)]
39
39
session?)]
40
40
[session? (-> any/c boolean?)]
Original file line number Diff line number Diff line change 424
424
(test-suite
425
425
"session "
426
426
427
+ (test-suite
428
+ "create "
429
+
430
+ (test-case "cookie jar can be #f "
431
+ (check-true (session? (make-session #:cookie-jar #f ))))
432
+
433
+ (test-case "cookie jar cannot be a symbol "
434
+ (check-exn exn:fail:contract? (lambda () (make-session #:cookie-jar 'oops )))))
435
+
427
436
(test-suite
428
437
"breaks "
429
438
You can’t perform that action at this time.
0 commit comments