From c63325e0395dc840cf5a884db3661a17218a9b4c Mon Sep 17 00:00:00 2001 From: Emil Williams Date: Tue, 6 May 2025 13:19:01 -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 98f9f76..99bdd54 100644 --- a/perl/Triple.pm +++ b/perl/Triple.pm @@ -77,7 +77,7 @@ sub init { }; foreach my $key (keys %page) { my @set = $page{$key}[0]; - last if $set->[0] == DYNAMIC_PAGE; + last if $set[0] == DYNAMIC_PAGE; syslog("info", "Marking Static '$key'"); print Dumper @set; # $template->process($datum[1], $vars, \$_) or syslog("info", $template->error()); -- 2.47.3