Verify that the HTML tags really do have their empty-tag behavior
This commit is contained in:
parent
ce73175427
commit
8be9abf1d4
|
@ -21,6 +21,16 @@
|
|||
=>
|
||||
(bytes-sort
|
||||
#"HTTP/1.1 200 Okay\r\nDate: REDACTED GMT\r\nLast-Modified: REDACTED 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 '(html)))
|
||||
=>
|
||||
(bytes-sort
|
||||
#"HTTP/1.1 200 Okay\r\nDate: REDACTED GMT\r\nLast-Modified: REDACTED GMT\r\nServer: Racket\r\nContent-Type: text/html; charset=utf-8\r\nConnection: close\r\n\r\n<html></html>")
|
||||
|
||||
(write-response (response/xexpr '(img)))
|
||||
=>
|
||||
(bytes-sort
|
||||
#"HTTP/1.1 200 Okay\r\nDate: REDACTED GMT\r\nLast-Modified: REDACTED GMT\r\nServer: Racket\r\nContent-Type: text/html; charset=utf-8\r\nConnection: close\r\n\r\n<img />")
|
||||
|
||||
(write-response (response/xexpr '(a ([href "#"]) "link")
|
||||
#:code 404))
|
||||
|
|
Loading…
Reference in New Issue
Block a user