From ffb164884c3f50811b900fee5c28293b3e32255f Mon Sep 17 00:00:00 2001
From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Thu, 30 Nov 2023 19:30:01 +0100
Subject: [PATCH] expires

---
 lib/perl/NB/CGI.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lib/perl/NB/CGI.pm b/lib/perl/NB/CGI.pm
index 55b5e77f..8c1e9f65 100644
--- a/lib/perl/NB/CGI.pm
+++ b/lib/perl/NB/CGI.pm
@@ -232,6 +232,8 @@ sub header {
   {
   	%p = &argsAdd(\@p,'Cache-Control','private, no-cache, no-store, must-revalidate, post-check=0, pre-check=0');
   	%p = &argsAdd(\@p,'Pragma','no-cache');
+  	%p = &argsAdd(\@p,'expires','now');
+  	#&CGI::cache(0); # we dont want doubles headers
   }
   #warn join('|',@p);
   #warn join('|',keys(%p));
-- 
2.47.3