From d57c359b1f0ba8e1aad2e0e8656104acfddf6cde Mon Sep 17 00:00:00 2001
From: Swrup <swrup@protonmail.com>
Date: Mon, 4 Apr 2022 17:33:49 +0200
Subject: [PATCH] use Cache-Control for posts images

---
 src/permap.ml | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/src/permap.ml b/src/permap.ml
index edf1b59..f17f7ed 100644
--- a/src/permap.ml
+++ b/src/permap.ml
@@ -304,7 +304,14 @@ let get_post_image ~thumbnail request =
   | Ok image_opt -> (
     match image_opt with
     | None -> Dream.respond ~status:`Not_Found "Image does not exists"
-    | Some image -> Dream.respond ~headers:[ ("Content-Type", "image") ] image )
+    | Some image ->
+      (* posts images do not change so we cache them *)
+      Dream.respond
+        ~headers:
+          [ ("Cache-Control", "max-age=3628800, immutable")
+          ; ("Content-Type", "image")
+          ]
+        image )
 
 let get_avatar_image request =
   let nick = Dream.param request "user" in