X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FExtMsg.pm;h=6cfc6c322295d2f6f3515de38db75e48e0dfff25;hb=b7ad68f80356124f08e93ead6a575375f726291f;hp=39ee05f48e00957c4aed81283519a94ab5ee68a1;hpb=610d056b90196f8c03f5f6fccaef0517e7fc9c19;p=public-inbox.git diff --git a/lib/PublicInbox/ExtMsg.pm b/lib/PublicInbox/ExtMsg.pm index 39ee05f4..6cfc6c32 100644 --- a/lib/PublicInbox/ExtMsg.pm +++ b/lib/PublicInbox/ExtMsg.pm @@ -16,7 +16,7 @@ use PublicInbox::WwwStream; our @EXT_URL = ( # leading "//" denotes protocol-relative (http:// or https://) '//marc.info/?i=%s', - '//mid.mail-archive.com/%s', + '//www.mail-archive.com/search?l=mid&q=%s', 'http://mid.gmane.org/%s', 'https://lists.debian.org/msgid-search/%s', '//docs.FreeBSD.org/cgi/mid.cgi?db=mid&id=%s', @@ -105,7 +105,7 @@ again: my $code = 404; my $h = PublicInbox::Hval->new_msgid($mid); - my $href = $h->as_href; + my $href = $h->{href}; my $html = $h->as_html; my $title = "<$html> not found"; my $s = "
Message-ID <$html>\nnot found\n";
@@ -120,7 +120,7 @@ again:
 			my $u = $ibx->base_url($env) or next;
 			foreach my $m (@$res) {
 				my $p = PublicInbox::Hval->new_msgid($m);
-				my $r = $p->as_href;
+				my $r = $p->{href};
 				my $t = $p->as_html;
 				$s .= qq{$u$t/\n};
 			}
@@ -158,7 +158,7 @@ sub ext_urls {
 sub exact {
 	my ($ctx, $found, $mid) = @_;
 	my $h = PublicInbox::Hval->new_msgid($mid);
-	my $href = $h->as_href;
+	my $href = $h->{href};
 	my $html = $h->as_html;
 	my $title = "<$html> found in ";
 	my $end = @$found == 1 ? 'another inbox' : 'other inboxes';