entered into RCS

diff --git a/dirent/scandir.c b/dirent/scandir.c
index 12bb03d..9b59981 100644 (file)
--- a/dirent/scandir.c
+++ b/dirent/scandir.c
@@ -1,4 +1,4 @@
-/* Copyright (C) 1992 Free Software Foundation, Inc.
+/* Copyright (C) 1992, 1993 Free Software Foundation, Inc.

 This file is part of the GNU C Library.
 
 The GNU C Library is free software; you can redistribute it and/or
 This file is part of the GNU C Library.
 
 The GNU C Library is free software; you can redistribute it and/or


@@ -73,10 +73,13 @@ DEFUN(scandir, (dir, namelist, select, cmp),
 
   if (errno != 0)
     {
 
   if (errno != 0)
     {

+      save = errno;

       (void) closedir (dp);
       (void) closedir (dp);

+      errno = save;

       return -1;
     }
 
       return -1;
     }
 

+  (void) closedir (dp);

   errno = save;
 
   /* Sort the list if we have a comparison function to sort with.  */
   errno = save;
 
   /* Sort the list if we have a comparison function to sort with.  */