summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mageia.org>2011-04-24 19:21:42 +0000
committerPascal Terjan <pterjan@mageia.org>2011-04-24 19:21:42 +0000
commit45310c58ac44f43743ec680c87fe24ea7311a7ec (patch)
treeba6935cf611732d5382ad6f4e3226fd48ae749e7
parentefedd69e3d3a801e7a7efa1a595666d27bf8bbb5 (diff)
downloaddrakx-backup-do-not-use-45310c58ac44f43743ec680c87fe24ea7311a7ec.tar
drakx-backup-do-not-use-45310c58ac44f43743ec680c87fe24ea7311a7ec.tar.gz
drakx-backup-do-not-use-45310c58ac44f43743ec680c87fe24ea7311a7ec.tar.bz2
drakx-backup-do-not-use-45310c58ac44f43743ec680c87fe24ea7311a7ec.tar.xz
drakx-backup-do-not-use-45310c58ac44f43743ec680c87fe24ea7311a7ec.zip
Fix fd leak
-rwxr-xr-xperl-install/c/stuff.xs.pl1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/c/stuff.xs.pl b/perl-install/c/stuff.xs.pl
index b2c4c2512..46bff27fb 100755
--- a/perl-install/c/stuff.xs.pl
+++ b/perl-install/c/stuff.xs.pl
@@ -512,6 +512,7 @@ EVIocGBitKey (char *file)
return;
}
+ close (fd);
for (i = NBITS(KEY_MAX) - 1; i > 0; i--)
if (bitmask[i])
break;