(fts_children): If fchdir fails, close file descriptor

before returning.  From NetBSD.

diff --git a/lib/fts.c b/lib/fts.c
index e917706c45bee0c884be2b01727b61fb561845f9..439826cfdb3fe80428e74b4831315d73eaaaf7c4 100644 (file)
--- a/lib/fts.c
+++ b/lib/fts.c
@@ -672,8 +672,10 @@ fts_children(sp, instr)
        if ((fd = open(".", O_RDONLY, 0)) < 0)
                return (NULL);
        sp->fts_child = fts_build(sp, instr);
-       if (fchdir(fd))
+       if (fchdir(fd)) {
+               (void)close(fd);
                return (NULL);
+       }
        (void)close(fd);
        return (sp->fts_child);
 }