thh/usevote
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Activity

Add option to read from Maildir.

Browse source 
Parse a mailbox by virtue of Mail::Box and
add "mailboxtype" to usevote.cfg.

Picked from upstream.

Signed-off-by: Thomas Hochstein <thh@inter.net>
This commit is contained in:
Thomas Hochstein 2014-02-15 17:41:54 +01:00
parent 0618b624e9
commit 34809a2a81
3 changed files with 42 additions and 34 deletions
Download patch file Download diff file Expand all files Collapse all files

10
uvvote.pl
View file

@ -135,16 +135,6 @@ if ($clean) {
my $thisresult = "ergebnis-" . $ext;
my $thisvotes = "stimmen-" . $ext;
# POP3 not activated: rename votes file
unless ($config{pop3}) {
print UVmessage::get("VOTE_RENAMING_MAILBOX"), "\n";
rename ($config{votefile}, "$config{tmpdir}/$thisvotes")
or die UVmessage::get("ERR_RENAME_MAILFILE") . "$!\n\n";
# wait, so that current mail deliveries can finalize
sleep 2;
}
# open results file
open (RESULT, ">>$config{tmpdir}/$thisresult")
or die UVmessage::get("VOTE_WRITE_RESULTS", (FILE=>$thisresult)) . "\n\n";