From 0260528e5a0125b649b1aedebe3a8b47aff3484c Mon Sep 17 00:00:00 2001 From: Emil Williams Date: Wed, 7 May 2025 21:35:46 -0600 Subject: [PATCH] -- --- perl/Triple.pm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/perl/Triple.pm b/perl/Triple.pm index 1f99463..8a5584a 100644 --- a/perl/Triple.pm +++ b/perl/Triple.pm @@ -88,17 +88,18 @@ sub init { # descriptions => \%Triple::descriptions, sitename => $sitename, version => $version, - # uri => '', + uri => '', description => '', }; foreach my $key (keys %page) { my @set = @{$page{$key}}; next if $set[0] != STATIC_PAGE; syslog("info", "Marking Static '$key'"); - # $vars->{"uri"} = "$key"; + $vars->{"uri"} = "$key"; my $temporary; - $template->process($set[1], $vars, \$temporary) or syslog("info", $template->error()); - $static{$key} = $temporary; + print $set[1]; + # $template->process($set[1], $vars, \$temporary) or syslog("info", $template->error()); + # $static{$key} = $temporary; } } -- 2.39.5