From 881b95bde3dc967e65af6764da983c4afeab54f9 Mon Sep 17 00:00:00 2001 From: blankie Date: Sat, 8 Oct 2022 22:38:44 +0700 Subject: [PATCH] ok --- src/page-file.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/page-file.rkt b/src/page-file.rkt index 9be0958..5d4b886 100644 --- a/src/page-file.rkt +++ b/src/page-file.rkt @@ -31,7 +31,7 @@ (define (html-from-url image-url) (log-outgoing image-url) (define dest-res (easy:head image-url #:timeouts timeouts)) - (define content-type (easy:response-headers-ref dest-res "Content-Type")) + (define content-type (easy:response-headers-ref dest-res 'Content-Type)) `(cond [(eq? content-type #f) ""] [(regexp-match? #rx"^image/" content-type)