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

---
 perl/Triple.pm | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

diff --git a/perl/Triple.pm b/perl/Triple.pm
index 98afc90..43bdd93 100644
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -78,13 +78,8 @@ sub init {
         foreach my $key (keys %page) {
             my @set = $page{$key};
             last if $set[0] == DYNAMIC_PAGE;
-            print Dumper @set;
-        # foreach (my ($path, @set) = each %page) {
-            # if ($datum[0] == DYNAMIC_PAGE) {
-            # syslog("info", "Marking Dynamic '$path'");
-            # next;
-            # }
-            # syslog("info", "Marking Static '$path'");
+            syslog("info", "Marking Static '$key'");
+            print Dumper $set[1];
             #         $template->process($datum[1], $vars, \$_) or syslog("info", $template->error());
             #         $static{$path} = $_;
         }
-- 
2.47.3