From 13924d7f6132c98cdd5041f01ec02296d4a92de0 Mon Sep 17 00:00:00 2001
From: swaggboi <swaggboi@slackware.uk>
Date: Mon, 29 Mar 2021 15:02:41 -0400
Subject: [PATCH] Refine the new cookie/session behavior Session is now a
 variable; applies to plain-text and session cookies (controller and passed
 throught to layout via stash())

---
 templates/layouts/swagg.html.ep | 2 +-
 www-swagg.pl                    | 8 ++++++--
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/templates/layouts/swagg.html.ep b/templates/layouts/swagg.html.ep
index b10f242..fadb05d 100644
--- a/templates/layouts/swagg.html.ep
+++ b/templates/layouts/swagg.html.ep
@@ -25,7 +25,7 @@
 <script>
   function closeIt() {
       document.getElementById("gdpr").style.display = "none";
-      document.cookie = "banner=seen; max-age=600;";
+      document.cookie = "banner=seen; <%= $sessionLife %>;";
   }
 
   function playIt() {
diff --git a/www-swagg.pl b/www-swagg.pl
index d05296a..4a07eed 100755
--- a/www-swagg.pl
+++ b/www-swagg.pl
@@ -16,15 +16,19 @@ plugin CGI => ['/cgi-bin/whoami.cgi' => './cgi-bin/whoami.cgi'  ];
 
 # Handle the session
 under sub {
-    my ($c) = @_;
+    my ($c)         = @_;
+    my $sessionLife = 604800;
 
     if ($c->cookie('banner') eq 'seen') {
         # Set session for a week
-        $c->session(expiration => 604800)->{banner} //= 'seen';
+        $c->session(expiration => $sessionLife, banner => 'seen');
         # Kill plain-text cookie
         $c->cookie(banner => 'seen', {expires => 1});
     }
 
+    # Pass in the expiration for plain-text cookie
+    $c->stash(sessionLife => $sessionLife);
+
     1;
 };