From 0ea6e372ef1246d90a3ce983c30f3cfa0de3c50a Mon Sep 17 00:00:00 2001 From: Emil Williams Date: Thu, 29 May 2025 16:58:06 -0600 Subject: [PATCH] -- --- perl/Triple.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/perl/Triple.pm b/perl/Triple.pm index 5bb5903..fa1ab15 100644 --- a/perl/Triple.pm +++ b/perl/Triple.pm @@ -103,10 +103,9 @@ sub Triple::main { $location = $vars->{"uri"}; } - my $thing = $page{$vars->{uri}} // $page{$vars->{''}}; + my $thing = $page{$vars->{uri}} || $page{$vars->{''}}; my @search = @{$thing}; - syslog("info", "sneed"); if ($search[PAGE_TYPE] == REDIRECT_PAGE) { # $vars->{uri} = $search[PAGE_TO]; -- 2.39.5