SecBSD's official ports repository
This commit is contained in:
commit
2c0afcbbf3
64331 changed files with 5339189 additions and 0 deletions
21
mail/p5-Log-Procmail/patches/patch-lib_Log_Procmail_pm
Normal file
21
mail/p5-Log-Procmail/patches/patch-lib_Log_Procmail_pm
Normal file
|
@ -0,0 +1,21 @@
|
|||
Index: lib/Log/Procmail.pm
|
||||
--- lib/Log/Procmail.pm.orig
|
||||
+++ lib/Log/Procmail.pm
|
||||
@@ -59,7 +59,7 @@ sub next {
|
||||
};
|
||||
|
||||
# assert: $read == 2;
|
||||
- /^ Subject: (.*)/i && do {
|
||||
+ /^ Subject:\s*(.*)/i && do {
|
||||
push @{$log->{buffer}}, Log::Procmail::Abstract->new()
|
||||
unless @{$log->{buffer}};
|
||||
$log->{buffer}[0]->subject($1);
|
||||
@@ -69,7 +69,7 @@ sub next {
|
||||
# procmail tabulates with tabs and spaces... :-(
|
||||
# assert: $read == 3;
|
||||
# Folder means the end of this record
|
||||
- /^ Folder: (.*?)\s+(\d+)$/ && do {
|
||||
+ /^ Folder:\s*(.*?)\s+(\d+)$/ && do {
|
||||
push @{$log->{buffer}}, Log::Procmail::Abstract->new()
|
||||
unless @{$log->{buffer}};
|
||||
|
Loading…
Add table
Add a link
Reference in a new issue