Add correct timestamp to mbox when processing.
Picked from upstream. Signed-off-by: Thomas Hochstein <thh@inter.net>
This commit is contained in:
parent
52a699fdc7
commit
3cb13d5a31
3
CHANGES
3
CHANGES
|
@ -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
|
||||||
|
|
|
@ -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);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in a new issue