diff options
Diffstat (limited to 'lib/PublicInbox/ExtMsg.pm')
-rw-r--r-- | lib/PublicInbox/ExtMsg.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/PublicInbox/ExtMsg.pm b/lib/PublicInbox/ExtMsg.pm index cf9b6d58..c6fc565a 100644 --- a/lib/PublicInbox/ExtMsg.pm +++ b/lib/PublicInbox/ExtMsg.pm @@ -137,9 +137,9 @@ again: if (@EXT_URL && index($mid, '@') >= 0) { $code = 300; $s .= "\nPerhaps try an external site:\n\n"; - my $scheme = $cgi->scheme; + my $env = $cgi->{env}; foreach my $u (@EXT_URL) { - $u = "$scheme:$u" if $u =~ m!\A//!; + $u = PublicInbox::Hval::prurl($env, $u); my $r = sprintf($u, $href); my $t = sprintf($u, $html); $s .= qq{<a\nhref="$r">$t</a>\n}; |