From 1b7b15da5f877a5ad6901167b70b9879a6f1afa3 Mon Sep 17 00:00:00 2001
From: Akira Tempaku <paku@skyizwhite.dev>
Date: Thu, 1 May 2025 23:25:28 +0900
Subject: [PATCH] Improve cache strategy
---
src/renderer.lisp | 9 +++------
1 file changed, 3 insertions(+), 6 deletions(-)
diff --git a/src/renderer.lisp b/src/renderer.lisp
index 65e83d8..23742cf 100644
--- a/src/renderer.lisp
+++ b/src/renderer.lisp
@@ -18,12 +18,9 @@
(if (string= (hp-env) "dev")
"private, no-store"
(cond
- ((eq strategy :static)
- "public, max-age=31536000, immutable")
- ((eq strategy :dynamic)
- "public, max-age=60 stale-while-revalidate=86400, stale-if-error=86400")
- (t
- "private, no-store")))))
+ ((eq strategy :static) "public, max-age=31536000, immutable")
+ ((eq strategy :dynamic) "public, max-age=60")
+ (t "private, no-store")))))
(defmethod jingle:process-response ((app jingle:app) result)
(set-response-header :content-type "text/html; charset=utf-8")