Add correct timestamp to mbox when processing.

Picked from upstream.

Signed-off-by: Thomas Hochstein <thh@inter.net>
This commit is contained in:
Thomas Hochstein 2014-02-16 13:36:28 +01:00
parent 52a699fdc7
commit 3cb13d5a31
2 changed files with 4 additions and 1 deletions

View file

@ -8,6 +8,9 @@ Version 4.12 (19.01.2014):
- uvbounce.pl und uvballot.pl benutzen jetzt wieder den uebergebenen - uvbounce.pl und uvballot.pl benutzen jetzt wieder den uebergebenen
Dateinamen statt irrtuemlich das Mailboxfile aus usevote.cfg Dateinamen statt irrtuemlich das Mailboxfile aus usevote.cfg
(Bugfix in UVreadmail.pm) (Bugfix in UVreadmail.pm)
- UVreadmail.pm setzt beim Schreiben eines Mailarchivs nun einen
Timestamp in der mbox-Fromline, der aus der Mail stammt
(timestamp()-Funktion von Mail::Box) statt dem aktuellen Datum
- UVreadmail.pm laesst nun Mailboxdateien bzw. -ordner bestehen, - UVreadmail.pm laesst nun Mailboxdateien bzw. -ordner bestehen,
auch wenn sie leer sind, um Kompatibiliaetsprobleme mit anderen auch wenn sie leer sind, um Kompatibiliaetsprobleme mit anderen
Programmen zu vermeiden Programmen zu vermeiden

View file

@ -162,7 +162,7 @@ sub process {
} else { } else {
$fromline .= 'foo@bar.invalid'; $fromline .= 'foo@bar.invalid';
} }
$fromline .= ' ' . localtime() . "\n"; #strftime ('%a %b %d %H:%M:%S %Y', localtime) . "\n"; $fromline .= ' ' . localtime($_->timestamp()) . "\n";
push (@mails, $fromline . $mail); push (@mails, $fromline . $mail);
} }
} }