--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index fb9a732857c45bcb76169b66ac13d57adbe0c959..12f69207ae815bdf968bee8abfbdfa0c59adf570 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -71,17 +71,17 @@ sub preinit {
 
 sub init {
 
-    sub init_static {
-        my $vars = {
-            banana => 'sand',
-            };
-        foreach (my ($path, @datum) = each %page) {
-            last if $datum[0] == DYNAMIC_PAGE;
-            syslog("info", "Marking Static $path");
-            $template->process($datum[1], $vars, \$_) or syslog("info", $template->error());
-            $static{$path} = $_;
-        }
-    }
+    # sub init_static {
+    #     my $vars = {
+    #         banana => 'sand',
+    #         };
+    #     foreach (my ($path, @datum) = each %page) {
+    #         last if $datum[0] == DYNAMIC_PAGE;
+    #         syslog("info", "Marking Static $path");
+    #         $template->process($datum[1], $vars, \$_) or syslog("info", $template->error());
+    #         $static{$path} = $_;
+    #     }
+    # }
 
     my ($sitename, $version) = preinit();