--

diff --git a/perl/Triple/Init.pm b/perl/Triple/Init.pm
index 1b23bac02ba3f5cb725504a54e48f36b797a3bb8..ad13ccd6edfde77720a0b775d21f2352550f3475 100644 (file)
--- a/perl/Triple/Init.pm
+++ b/perl/Triple/Init.pm
@@ -48,13 +48,13 @@ 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]";
         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;
     }
 }