--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index 837766c25fdf53b2dffe25a78a767447046b9060..3cdf2006789b5d7de58bae88f55b25b10a03355a 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -106,7 +106,7 @@ sub Triple::main {
             my $thing = $page{$vars->{uri}} // $page{$vars->{''}};
             syslog("info", "sneed");
 
-            my @search = @{};
+            my @search = @{$thing};
 
             if ($search[PAGE_TYPE] == REDIRECT_PAGE) {
                 # $vars->{uri} = $search[PAGE_TO];