From: Emil Williams Date: Fri, 30 May 2025 00:37:01 +0000 (-0600) Subject: -- X-Git-Url: https://git.xolatile.top/?a=commitdiff_plain;h=0930cca0a1166cfceb3801b2d72e95fd66f1e06f;p=emil-3chen.org.git -- --- diff --git a/perl/Triple.pm b/perl/Triple.pm index 6fc9650..d9032b1 100644 --- a/perl/Triple.pm +++ b/perl/Triple.pm @@ -103,9 +103,9 @@ sub Triple::main { $location = $vars->{"uri"}; } - my $page = $page{$vars->{uri}} || $page{$vars->{''}}; + my $search_page = $page{$vars->{uri}} || $page{$vars->{''}}; - my @search = @{$page}; + my @search = @{$search_page}; if ($search[PAGE_TYPE] == REDIRECT_PAGE) { # $vars->{uri} = $search[PAGE_TO]; @@ -129,10 +129,11 @@ sub Triple::main { next if $status ne ''; + my $page = $static{$vars->{uri}}; if (not $page) { - if (@{$page{$vars->{uri}}}[PAGE_TO]) { + if (@search[PAGE_TO]) { } - my $dynamic = $page{$vars->{uri}}; + my $dynamic = $search_page}; if ($dynamic) { my @set = @{$dynamic}; $vars->{"title"} = "$set[PAGE_TITLE]";