--

diff --git a/perl/Triple/Init.pm b/perl/Triple/Init.pm
index 114978449744d2d2f4e55328195efcf86472ce98..c1cb6843d0810007bdd7b7287b3fb210b55c8077 100644 (file)
--- a/perl/Triple/Init.pm
+++ b/perl/Triple/Init.pm
@@ -48,14 +48,14 @@ sub static {
     };
     foreach my $key (keys %Triple::page) {
         my @set = @{$Triple::page{$key}};
-           next if $set[PAGE_TYPE] != STATIC_PAGE;
+           next if $set[Triple::PAGE_TYPE] != Triple::STATIC_PAGE;
         syslog("info", "Marking Static '$key'");
         $vars->{"uri"} = "$key";
-        $vars->{"title"} = "$set[PAGE_TITLE]";
-        $vars->{"description"} = "$set[PAGE_DESCRIPTION]";
+        $vars->{"title"} = "$set[Triple::PAGE_TITLE]";
+        $vars->{"description"} = "$set[Triple::PAGE_DESCRIPTION]";
         syslog("info", $vars->{"uri"} . " " . $vars->{"title"} . " " . $vars->{"description"});
         my $temporary;
-        $template->process($set[PAGE_TT], $vars, \$temporary) or syslog("info", $template->error());
+        $template->process($set[Triple::PAGE_TT], $vars, \$temporary) or syslog("info", $template->error());
         $static{$key} = $temporary;
     }
 }