--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index cfb8ccfd78975ae211ccc656dba4d4c275b80bb9..4a5ebf0aabfb0e0d94ff04a0b9c5e260f04161aa 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -77,8 +77,7 @@ sub init {
         };
         foreach my $key (keys %page) {
             my @set = @{$page{$key}};
-            print Dumper @set;
-            last if $set[0] == DYNAMIC_PAGE;
+            next if $set[0] == DYNAMIC_PAGE;
             syslog("info", "Marking Static '$key'");
             #         $template->process($datum[1], $vars, \$_) or syslog("info", $template->error());
             #         $static{$path} = $_;