about summary refs log tree commit homepage
path: root/lib/PublicInbox/Mbox.pm
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2016-06-20 00:57:14 +0000
committerEric Wong <e@80x24.org>2016-06-20 00:57:36 +0000
commit1e2f280d973dd0a744d134368fa9fbfbb6aab161 (patch)
treed957ccc2d202a75a86f664eba3fbe1559d8966a8 /lib/PublicInbox/Mbox.pm
parent3b620d93cdc3bcf8eab02fd874a34db7ae013775 (diff)
downloadpublic-inbox-1e2f280d973dd0a744d134368fa9fbfbb6aab161.tar.gz
We do not need feed options there (or anywhere, hopefully).
Diffstat (limited to 'lib/PublicInbox/Mbox.pm')
-rw-r--r--lib/PublicInbox/Mbox.pm11
1 files changed, 3 insertions, 8 deletions
diff --git a/lib/PublicInbox/Mbox.pm b/lib/PublicInbox/Mbox.pm
index 79348766..1c792c89 100644
--- a/lib/PublicInbox/Mbox.pm
+++ b/lib/PublicInbox/Mbox.pm
@@ -32,19 +32,14 @@ sub emit_msg {
         foreach my $d (qw(Lines Bytes Content-Length Status)) {
                 $header_obj->header_set($d);
         }
-        my $feed_opts = $ctx->{feed_opts};
-        unless ($feed_opts) {
-                require PublicInbox::Feed; # FIXME: gross
-                $feed_opts = PublicInbox::Feed::get_feedopts($ctx);
-                $ctx->{feed_opts} = $feed_opts;
-        }
-        my $base = $feed_opts->{url};
+        my $ibx = $ctx->{-inbox};
+        my $base = $ibx->base_url($ctx->{cgi});
         my $mid = mid_clean($header_obj->header('Message-ID'));
         $mid = uri_escape_utf8($mid);
         my @append = (
                 'Archived-At', "<$base$mid/>",
                 'List-Archive', "<$base>",
-                'List-Post', "<mailto:$feed_opts->{id_addr}>",
+                'List-Post', "<mailto:$ibx->{-primary_address}>",
         );
         my $append = '';
         my $crlf = $simple->crlf;