diff options
| author | Eric Wong <e@80x24.org> | 2014-04-20 23:27:46 +0000 |
|---|---|---|
| committer | Eric Wong <e@80x24.org> | 2014-04-20 23:27:46 +0000 |
| commit | 1c910ebd5d088b68fd1cec41285ad62641673845 (patch) | |
| tree | 83bf0ec7dbd5488cb4138ac7c9b619fbb60cd5ba /t/mda.t | |
| parent | 66a26a8c44100fe4be59d82f3600a5c14495d49d (diff) | |
| download | public-inbox-1c910ebd5d088b68fd1cec41285ad62641673845.tar.gz | |
It should be common for a single users to be subscribed to multiple addresses/lists, so we must use the address before alias expansion. This partially reverts commit b949afc9edf89dd494cac6255c78b124d58e11a5
Diffstat (limited to 't/mda.t')
| -rw-r--r-- | t/mda.t | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -47,7 +47,7 @@ my $failbox = "$home/fail.mbox"; my $good_rev; local $ENV{PI_EMERGENCY} = $failbox; local $ENV{HOME} = $home; - local $ENV{RECIPIENT} = $addr; + local $ENV{ORIGINAL_RECIPIENT} = $addr; my $simple = Email::Simple->new(<<EOF); From: Me <me\@example.com> To: You <you\@example.com> @@ -135,7 +135,7 @@ Date: deadbeef { local $ENV{PI_EMERGENCY} = $failbox; local $ENV{HOME} = $home; - local $ENV{RECIPIENT} = $addr; + local $ENV{ORIGINAL_RECIPIENT} = $addr; local $ENV{PATH} = $main_path; my $mid = 'spam-train@example.com'; my $simple = Email::Simple->new(<<EOF); @@ -169,7 +169,7 @@ EOF { local $ENV{PI_EMERGENCY} = $failbox; local $ENV{HOME} = $home; - local $ENV{RECIPIENT} = $addr; + local $ENV{ORIGINAL_RECIPIENT} = $addr; local $ENV{PATH} = $main_path; my $mid = 'ham-train@example.com'; my $simple = Email::Simple->new(<<EOF); @@ -199,7 +199,7 @@ EOF my $faildir= "$home/faildir/"; local $ENV{PI_EMERGENCY} = $faildir; local $ENV{HOME} = $home; - local $ENV{RECIPIENT} = $addr; + local $ENV{ORIGINAL_RECIPIENT} = $addr; local $ENV{PATH} = $fail_path; my $in = <<EOF; From: Faildir <faildir\@example.com> |