From 2cbc26da7fedaf56614b923aa3e957f967363f0b Mon Sep 17 00:00:00 2001
From: Emil Williams <emilemilemil@cock.li>
Date: Tue, 6 May 2025 13:18:30 -0600
Subject: [PATCH] --

---
 perl/Triple.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/Triple.pm b/perl/Triple.pm
index b9a8485..3704758 100644
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -76,7 +76,7 @@ sub init {
             banana => 'sand',
         };
         foreach my $key (keys %page) {
-            my @set = $page{$key};
+            my @set = $page{$key}[0];
             last if $set->[0] == DYNAMIC_PAGE;
             syslog("info", "Marking Static '$key'");
             # print Dumper $set->[0];
-- 
2.47.3