suzanne.soy/compatibility
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Correct the cookie contract function

Browse Source 
svn: r18630

original commit: 3e546fee60f0902d384c7e7c7db597e7bd019ec9
This commit is contained in:
Jay McCarthy 2010-03-26 16:45:42 +00:00
parent 3f01662a45
commit 29e1296e08
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/net/cookie-unit.ss
View File

@ -261,7 +261,8 @@
;; value: token | quoted-string
(define (rfc2109:value? s)
(or (rfc2068:token? s) (rfc2068:quoted-string? s)))
(or (rfc2068:token? s) (rfc2068:quoted-string? s)
(rfc2068:quoted-string? (convert-to-quoted s))))
;; convert-to-quoted : string -> quoted-string?
;; takes the given string as a particular message, and converts the given