diff --git a/collects/tests/web-server/http/xexpr.rkt b/collects/tests/web-server/http/xexpr.rkt
index e747ae4108..f25e415b2f 100644
--- a/collects/tests/web-server/http/xexpr.rkt
+++ b/collects/tests/web-server/http/xexpr.rkt
@@ -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\nlink")
+
+(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")
+
+ (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![]()
")
(write-response (response/xexpr '(a ([href "#"]) "link")
#:code 404))