Revision 38c19bfd
Von Sven Schöling vor mehr als 15 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.