diff options
| author | Pascal Terjan <pterjan@mageia.org> | 2011-04-24 19:21:42 +0000 |
|---|---|---|
| committer | Pascal Terjan <pterjan@mageia.org> | 2011-04-24 19:21:42 +0000 |
| commit | 24cdd14d5aeff477c2aa8ec0a326bf2c7c4f9d50 (patch) | |
| tree | ba6935cf611732d5382ad6f4e3226fd48ae749e7 /perl-install | |
| parent | 10cdce9920ae5cf7a0e8df9231dd874a5de2dfc8 (diff) | |
| download | drakx-24cdd14d5aeff477c2aa8ec0a326bf2c7c4f9d50.tar drakx-24cdd14d5aeff477c2aa8ec0a326bf2c7c4f9d50.tar.gz drakx-24cdd14d5aeff477c2aa8ec0a326bf2c7c4f9d50.tar.bz2 drakx-24cdd14d5aeff477c2aa8ec0a326bf2c7c4f9d50.tar.xz drakx-24cdd14d5aeff477c2aa8ec0a326bf2c7c4f9d50.zip | |
Fix fd leak
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/c/stuff.xs.pl | 1 |
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; |