Author: jim
Date: Fri May 23 13:03:51 2014
New Revision: 1597085
URL: http://svn.apache.org/r1597085
Log:
close right after writing... we should lock
around this, but save that change for post-ASF elections.
Modified:
steve/trunk/cmdline/vote.pl
Modified: steve/trunk/cmdline/vote.pl
URL:
http://svn.apache.org/viewvc/steve/trunk/cmdline/vote.pl?rev=1597085&r1=1597084&r2=1597085&view=diff
==============================================================================
--- steve/trunk/cmdline/vote.pl (original)
+++ steve/trunk/cmdline/vote.pl Fri May 23 13:03:51 2014
@@ -189,7 +189,8 @@ if (!defined($vhash2)) { die "I can't fi
# ==========================================================================
# construct vote entry
$date = &get_date;
-$entry = "[$date] $vhash2 $vote";
+####$entry = "[$date] $vhash2 $vote";
+$entry = "[$date] $vhash2 $vote\n";
# ==========================================================================
# write vote entry to tally file -- this should be atomic
@@ -206,9 +207,11 @@ do {
$len -= $written;
$off -= $written;
} while ($len > 0);
+close(TALLY);
-# Close TALLY later, to "keep the books balanced" (well, noisily unbalanced)
-# in case someone ^C's us just before sendmail is run.
+# Disregard below "^####" comments for now...
+#### Close TALLY later, to "keep the books balanced" (well, noisily unbalanced)
+##### in case someone ^C's us just before sendmail is run.
print "Your vote has been accepted on issue $issuename\n";
# ==========================================================================
@@ -254,8 +257,8 @@ foreach $vf (@vfiles) {
close(MAIL);
# Finish log entry
-syswrite(TALLY, "\n") or die "$pname: cannot finalize tally: $!\n";
-close(TALLY);
+####syswrite(TALLY, "\n") or die "$pname: cannot finalize tally: $!\n";
+####close(TALLY);
# ==========================================================================
