Subject: | body_set not working under certain conditions |
The problem:
-----
use Email::MIME;
my $parsed = Email::MIME->new(
q!From: la@la.com
To: la@la.com
Some stuff
!);
# Let's pretend something happened here that caused this to happen: (a
# parts_multipart() call would do it)
$parsed->{body_raw} = 'Some stuff';
$parsed->body_set('other stuff');
print $parsed->as_string;
-----
So our call to body_set is ignored. HORROR!