47 |
unless (defined $self->{option}->{fill_ct}) { |
unless (defined $self->{option}->{fill_ct}) { |
48 |
$self->{option}->{fill_ct} = $self->{option}->{format} =~ /http|mime/; |
$self->{option}->{fill_ct} = $self->{option}->{format} =~ /http|mime/; |
49 |
} |
} |
50 |
|
if ($self->{option}->{format} =~ /http/) { |
51 |
|
$self->{option}->{use_normalization} = 0; |
52 |
|
} else { |
53 |
|
$self->{option}->{use_normalization} = 1; |
54 |
|
} |
55 |
} |
} |
56 |
|
|
57 |
=item $body = Message::Body::TextPlain->new ([%options]) |
=item $body = Message::Body::TextPlain->new ([%options]) |