From 6d2f5904fe43b79a216282c043596a3e99e0f211 Mon Sep 17 00:00:00 2001
From: blankie <blankie@nixnetmail.com>
Date: Sat, 8 Oct 2022 22:36:13 +0700
Subject: [PATCH] `?

---
 src/page-file.rkt | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/page-file.rkt b/src/page-file.rkt
index 99dedee..9be0958 100644
--- a/src/page-file.rkt
+++ b/src/page-file.rkt
@@ -32,7 +32,7 @@
   (log-outgoing image-url)
   (define dest-res (easy:head image-url #:timeouts timeouts))
   (define content-type (easy:response-headers-ref dest-res "Content-Type"))
-  (cond
+  `(cond
     [(eq? content-type #f) ""]
     [(regexp-match? #rx"^image/" content-type)
       (img (@ (src ,(u-proxy-url image-url))))]
@@ -67,7 +67,7 @@
    `(div
      ,(if (non-empty-string? video-embed-code)
          (update-tree-wiki (html->xexp (preprocess-html-wiki video-embed-code)) wikiname)
-         `(html-from-url image-url))
+         (html-from-url image-url))
      (p
        ,(if (non-empty-string? video-embed-code)
            `""