mime-words encoded strings can have parts separated by just spaces

This commit is contained in:
Jamie Cameron
2021-09-02 14:18:43 -07:00
parent e792e4bd4b
commit 63057dc6c7

View File

@@ -1564,7 +1564,7 @@ sub decode_mimewords {
$@ = ''; ### error-return
### Collapse boundaries between adjacent encoded words:
$encstr =~ s{(\?\=)\r?\n[ \t](\=\?)}{$1$2}gs;
$encstr =~ s{(\?\=)\r?\n?[ \t](\=\?)}{$1$2}gs;
pos($encstr) = 0;
### print STDOUT "ENC = [", $encstr, "]\n";