about summary refs log tree commit homepage
path: root/lib/PublicInbox/Hval.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/PublicInbox/Hval.pm')
-rw-r--r--lib/PublicInbox/Hval.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/PublicInbox/Hval.pm b/lib/PublicInbox/Hval.pm
index 4a79439f..cd3a4df3 100644
--- a/lib/PublicInbox/Hval.pm
+++ b/lib/PublicInbox/Hval.pm
@@ -86,6 +86,12 @@ sub raw {
 
 sub prurl {
         my ($env, $u) = @_;
+        if (ref($u) eq 'ARRAY') {
+                my $h = $env->{HTTP_HOST} // $env->{SERVER_NAME};
+                my @host_match = grep(/\b\Q$h\E\b/, @$u);
+                $u = $host_match[0] // $u->[0];
+                # fall through to below:
+        }
         index($u, '//') == 0 ? "$env->{'psgi.url_scheme'}:$u" : $u;
 }