X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Freply.t;h=53162df5d2566be1097745890cac339d6e866124;hb=352956bcf1933bdaeba631deb4ade7dc7fd754b1;hp=719b4e47565f06d3365ae43562e3c4ffcf657e4a;hpb=666844ae42b5b17fd2e9b7ea6cf04727487b5322;p=public-inbox.git diff --git a/t/reply.t b/t/reply.t index 719b4e47..53162df5 100644 --- a/t/reply.t +++ b/t/reply.t @@ -1,9 +1,9 @@ -# Copyright (C) 2017 all contributors +# Copyright (C) 2017-2020 all contributors # License: AGPL-3+ use strict; use warnings; use Test::More; -use Email::MIME; +use PublicInbox::Eml; use_ok 'PublicInbox::Reply'; my @q = ( @@ -19,7 +19,7 @@ while (@q) { is($res, $expect, "quote $input => $res"); } -my $mime = Email::MIME->new(<<'EOF'); +my $mime = PublicInbox::Eml->new(<<'EOF'); From: from To: to Cc: cc@example.com @@ -76,4 +76,9 @@ $exp = [ is_deeply($arg, $exp, 'address obfuscation works'); is($link, '', 'no mailto: link given'); +$ibx->{replyto} = ':none=dead list'; +$ibx->{obfuscate} = 1; +($arg, $link) = PublicInbox::Reply::mailto_arg_link($ibx, $hdr); +is($$arg, 'dead list', ':none= works'); + done_testing();