#!/usr/bin/perl -w
###############################################################################
-# UseVoteGer 4.11 Wahldurchfuehrung
-# (c) 2001-2012 Marc Langer <uv@marclanger.de>
+# UseVoteGer 4.12 Wahldurchfuehrung
+# (c) 2001-2014 Marc Langer <uv@marclanger.de>
#
# This script package is free software; you can redistribute it and/or
# modify it under the terms of the GNU Public License as published by the
# normally unixtime is sufficient, if it is not unique append our PID
my $ext = time;
- opendir (DIR, $config{tmpdir});
- my @tmpfiles = readdir (DIR);
- closedir (DIR);
+ opendir (TMP, $config{tmpdir});
+ my @tmpfiles = readdir (TMP);
+ closedir (TMP);
opendir (FERTIG, $config{archivedir});
my @fertigfiles = readdir (FERTIG);
closedir (FERTIG);