X-Git-Url: https://code.th-h.de/?p=usenet%2Fusevote.git;a=blobdiff_plain;f=uvvote.pl;h=72a366e34d1530b662dd67deb4ce80ec9e42a192;hp=a86ef437dbfa0a848a6d6dc7dff875611400cabf;hb=69291ddcaae6fe05baeabb7806495dbc241ae409;hpb=ac7e2c541a18c5c910548f5cddaf56502b6e51b0

diff --git a/uvvote.pl b/uvvote.pl
old mode 100644
new mode 100755
index a86ef43..72a366e
--- 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 (TMP, $config{tmpdir});
+  opendir (DIR, $config{tmpdir});
   my @tmpfiles = readdir (DIR);
-  closedir (TMP);
+  closedir (DIR);
   opendir (FERTIG, $config{archivedir});
   my @fertigfiles = readdir (FERTIG);
   closedir (FERTIG);