From 556e892002b29ea47d096fa15e5a72494f2d01a2 Mon Sep 17 00:00:00 2001
From: digimer <mkelly@alteeve.ca>
Date: Fri, 3 Nov 2023 20:13:47 -0400
Subject: [PATCH] Added 'sessions' to the age-out table list

* To help mitigate issue #520.

Signed-off-by: digimer <mkelly@alteeve.ca>
---
 Anvil/Tools/Database.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/Anvil/Tools/Database.pm b/Anvil/Tools/Database.pm
index 85aff835..1e49a47f 100644
--- a/Anvil/Tools/Database.pm
+++ b/Anvil/Tools/Database.pm
@@ -19209,6 +19209,9 @@ sub _age_out_data
 	$to_clean->{table}{bonds}{child_table}{bonds}{uuid_column}                           = "bond_uuid";
 	$to_clean->{table}{ip_addresses}{child_table}{ip_addresses}{uuid_column}             = "ip_address_uuid";
 	
+	# Misc stuff
+	$to_clean->{table}{sessions}{child_table}{sessions}{uuid_column} = "session_uuid";
+	
 	my $vacuum = 0;
 	foreach my $table (sort {$a cmp $b} keys %{$to_clean->{table}})
 	{