--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index 23d65c15c11b20ee07b77ea72c064e4844ecc596..e2dbfa7a7b61c06e5a7e0af1b89ccf10ef706bc9 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -53,7 +53,7 @@ sub Triple::main {
         if (not $page) {
             my $dynamic = $page{$vars->{uri}};
             if ($dynamic) {
-                @set = @{$dynamic};
+                my @set = @{$dynamic};
                 $page = "dynamic, no?";
             } else {
                 $page = %static{''};