From 3cb13d5a31d66e59c437148a0d96d2ae1c3046ae Mon Sep 17 00:00:00 2001 From: Thomas Hochstein Date: Sun, 16 Feb 2014 13:36:28 +0100 Subject: [PATCH] Add correct timestamp to mbox when processing. Picked from upstream. Signed-off-by: Thomas Hochstein --- CHANGES | 3 +++ UVreadmail.pm | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/CHANGES b/CHANGES index 6ccc966..f73d3d8 100644 --- a/CHANGES +++ b/CHANGES @@ -8,6 +8,9 @@ Version 4.12 (19.01.2014): - uvbounce.pl und uvballot.pl benutzen jetzt wieder den uebergebenen Dateinamen statt irrtuemlich das Mailboxfile aus usevote.cfg (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, auch wenn sie leer sind, um Kompatibiliaetsprobleme mit anderen Programmen zu vermeiden diff --git a/UVreadmail.pm b/UVreadmail.pm index 35dda15..0a1f98f 100644 --- a/UVreadmail.pm +++ b/UVreadmail.pm @@ -162,7 +162,7 @@ sub process { } else { $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); } }