--

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