Revision 38c19bfd
Von Sven Schöling vor fast 16 Jahren hinzugefügt
| SL/Mailer.pm | ||
|---|---|---|
| 131 | 131 |
} |
| 132 | 132 |
|
| 133 | 133 |
my $headers = ''; |
| 134 |
foreach my $item (qw(from to cc)) {
|
|
| 134 |
foreach my $item (qw(from to cc bcc)) {
|
|
| 135 | 135 |
next unless ($self->{$item});
|
| 136 | 136 |
my (@addr_objects) = Email::Address->parse($self->{$item});
|
| 137 | 137 |
next unless (scalar @addr_objects); |
Auch abrufbar als: Unified diff
Patch aus Bug 881 übernommen.