From cc14be00229c28b3a5e0cf15bf0d77f5e3e5d287 Mon Sep 17 00:00:00 2001
From: swag <swaggboi@slackware.uk>
Date: Fri, 2 Jun 2023 16:51:42 -0400
Subject: [PATCH] Tighten up session time for mods/admins

---
 lib/PostText.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lib/PostText.pm b/lib/PostText.pm
index 91993da..162b4b1 100644
--- a/lib/PostText.pm
+++ b/lib/PostText.pm
@@ -104,6 +104,8 @@ sub startup($self) {
     # Begin routing
     my $r = $self->routes->under(sub ($c) {
         $c->session(expires => time + 31536000);
+        $c->session(expires => time +     3600) if $c->is_mod;
+        $c->session(expires => time +     1800) if $c->is_admin;
 
         $c->session(author => 'Anonymous') unless $c->session('author');