From: Emil Williams Date: Tue, 6 May 2025 19:16:21 +0000 (-0600) Subject: -- X-Git-Url: https://git.xolatile.top/?a=commitdiff_plain;h=8eb00f0a1afcc1bd30cfb9c772b0302b8a6b3f54;p=emil-3chen.org.git -- --- diff --git a/perl/Triple.pm b/perl/Triple.pm index cb85cb0..6d06cf3 100644 --- a/perl/Triple.pm +++ b/perl/Triple.pm @@ -76,10 +76,10 @@ sub init { banana => 'sand', }; foreach my $key (keys %page) { - my @set = $page{$key}; + my $set = $page{$key}; last if $set[0] == DYNAMIC_PAGE; syslog("info", "Marking Static '$key'"); - print Dumper $set[0][0]; + print Dumper $set[0]; # $template->process($datum[1], $vars, \$_) or syslog("info", $template->error()); # $static{$path} = $_; }