X-Git-Url: https://code.th-h.de/?p=usenet%2Fusevote.git;a=blobdiff_plain;f=uvvote.pl;h=8e8fb68b608af026802046e34eea285ff7aca6b7;hp=c0c3712f62f50a842eb94ffe77b49549af6a6de2;hb=dc651b428363dfeea82fd030905711b8d96ea9b4;hpb=e670e40bb0f2864e7ac72b348a44e66e9fcab095 diff --git a/uvvote.pl b/uvvote.pl index c0c3712..8e8fb68 100755 --- a/uvvote.pl +++ b/uvvote.pl @@ -122,9 +122,9 @@ if ($clean) { # 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);