From de61f848845f94ecf301c38b936e9dcff62849bd Mon Sep 17 00:00:00 2001 From: Emil Williams Date: Tue, 20 May 2025 18:48:06 -0600 Subject: [PATCH] -- --- perl/Triple/Init.pm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/perl/Triple/Init.pm b/perl/Triple/Init.pm index ad13ccd..1149784 100644 --- a/perl/Triple/Init.pm +++ b/perl/Triple/Init.pm @@ -48,13 +48,14 @@ sub static { }; foreach my $key (keys %Triple::page) { my @set = @{$Triple::page{$key}}; - next if $set[Triple::PAGE_TYPE] != Triple::STATIC_PAGE; + next if $set[PAGE_TYPE] != STATIC_PAGE; syslog("info", "Marking Static '$key'"); $vars->{"uri"} = "$key"; - $vars->{"title"} = "$set[Triple::PAGE_TITLE]"; - $vars->{"description"} = "$set[Triple::PAGE_DESCRIPTION]"; + $vars->{"title"} = "$set[PAGE_TITLE]"; + $vars->{"description"} = "$set[PAGE_DESCRIPTION]"; + syslog("info", $vars->{"uri"} . " " . $vars->{"title"} . " " . $vars->{"description"}); my $temporary; - $template->process($set[Triple::PAGE_TT], $vars, \$temporary) or syslog("info", $template->error()); + $template->process($set[PAGE_TT], $vars, \$temporary) or syslog("info", $template->error()); $static{$key} = $temporary; } } -- 2.39.5