news_www: favor ->ALL URL when using ->ALL

[public-inbox.git] / lib / PublicInbox / NewsWWW.pm

diff --git a/lib/PublicInbox/NewsWWW.pm b/lib/PublicInbox/NewsWWW.pm
index abafc4f97b22c037bb138f7e6fe0c8d798c48d2d..d13731ae3f96b77b1996086647e1868b7615211c 100644 (file)
--- a/lib/PublicInbox/NewsWWW.pm
+++ b/lib/PublicInbox/NewsWWW.pm
@@ -82,7 +82,8 @@ sub call {
                                for (@$xr3) {
                                        s/:[0-9]+:$x->{blob}\z// or next;
                                        my $ibx = $by_eidx_key->{$_} // next;
-                                       my $url = $ibx->base_url or next;
+                                       my $url = $ALL->base_url($env) //
+                                                       $ibx->base_url // next;
                                        $url .= mid_escape($mid) . '/';
                                        return redirect(302, $url);
                                }