diff options
Diffstat (limited to 'fml/lib')
| -rw-r--r-- | fml/lib/FML/Header.pm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/fml/lib/FML/Header.pm b/fml/lib/FML/Header.pm index 3b4afe6b..a8087601 100644 --- a/fml/lib/FML/Header.pm +++ b/fml/lib/FML/Header.pm @@ -178,6 +178,14 @@ sub remove_subject_tag_like_string } +sub delete_unsafe_header_fields +{ + my ($header, $config, $args) = @_; + my (@fields) = split(/\s+/, $config->{ unsafe_header_fields }); + for (@fields) { $header->delete($_);} +} + + =head1 SEE ALSO L<Mail::Address> |