Fix test for new DrDr

This commit is contained in:
Jay McCarthy 2014-11-18 13:46:30 -05:00
parent 90bd44a622
commit 2307c427d5

View File

@ -55,7 +55,7 @@
#f))
=>
(bytes-sort
#"HTTP/1.1 200 Okay\r\nDate: REDACTED GMT\r\nLast-Modified: Thu, 01 Jan 1970 00:00:00 GMT\r\nServer: Racket\r\nContent-Type: text/html; charset=utf-8\r\nConnection: close\r\n\r\n<a href=\"#\">link</a>")
#"HTTP/1.1 200 Okay\r\nDate: REDACTED GMT\r\nLast-Modified: Wed, 31 Dec 1969 23:00:00 GMT\r\nServer: Racket\r\nContent-Type: text/html; charset=utf-8\r\nConnection: close\r\n\r\n<a href=\"#\">link</a>")
(write-response (response/xexpr '(a ([href "#"]) "link")
#:mime-type #"application/xml"))