From: Emil Williams Date: Tue, 6 May 2025 19:14:34 +0000 (-0600) Subject: -- X-Git-Url: https://git.xolatile.top/?a=commitdiff_plain;h=2d833736804ed7a2889346016f374b1c0a04dd47;p=emil-3chen.org.git -- --- 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} = $_; }