diff options
author | Olivier Blin <oblin@mandriva.com> | 2008-06-25 15:16:56 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.com> | 2008-06-25 15:16:56 +0000 |
commit | 2f0f10d8298369d0762ad6071c29df62314bfe68 (patch) | |
tree | 782113a9cee47eb6936f14c3415fe6f44284c5e7 /perl-install/c | |
parent | c25a783758028e140d6646ea3237ba2885fb8b6b (diff) | |
download | drakx-2f0f10d8298369d0762ad6071c29df62314bfe68.tar drakx-2f0f10d8298369d0762ad6071c29df62314bfe68.tar.gz drakx-2f0f10d8298369d0762ad6071c29df62314bfe68.tar.bz2 drakx-2f0f10d8298369d0762ad6071c29df62314bfe68.tar.xz drakx-2f0f10d8298369d0762ad6071c29df62314bfe68.zip |
fix minor fd leak (backport from trunk)
Diffstat (limited to 'perl-install/c')
-rw-r--r-- | 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 4b8ca36f4..3058d4b66 100644 --- a/perl-install/c/stuff.xs.pl +++ b/perl-install/c/stuff.xs.pl @@ -354,6 +354,7 @@ get_netdevices() if (ioctl(s, SIOCGIFCONF, &ifc) < 0) { perror("SIOCGIFCONF"); + close(s); return; } if (ifc.ifc_len == sizeof(struct ifreq) * numreqs) { |