71 |
for (@field_type_Date) |
for (@field_type_Date) |
72 |
{$DEFAULT{field_type}->{$_} = 'Message::Field::Date'} |
{$DEFAULT{field_type}->{$_} = 'Message::Field::Date'} |
73 |
my @field_type_MsgID = qw(content-id in-reply-to message-id |
my @field_type_MsgID = qw(content-id in-reply-to message-id |
74 |
references resent-message-id supersedes); |
references resent-message-id see-also supersedes); |
75 |
for (@field_type_MsgID) |
for (@field_type_MsgID) |
76 |
{$DEFAULT{field_type}->{$_} = 'Message::Field::Structured'} |
{$DEFAULT{field_type}->{$_} = 'Message::Field::MsgID'} |
77 |
my @field_type_Received = qw(received x-received); |
my @field_type_Received = qw(received x-received); |
78 |
for (@field_type_Received) |
for (@field_type_Received) |
79 |
{$DEFAULT{field_type}->{$_} = 'Message::Field::Received'} |
{$DEFAULT{field_type}->{$_} = 'Message::Field::Received'} |