--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2008-10-10  Bruno Haible  <bruno@clisp.org>
+
+	* lib/copy-acl.c (qcopy_acl) [CYGWIN]: Call chmod before setting the
+	ACL, not afterwards. Fixes test failure on Cygwin.
+
 2008-10-09  Ben Pfaff  <blp@gnu.org>
 
 	* build-aux/announce-gen: Fix gnulib version related part of usage

--- a/lib/copy-acl.c
+++ b/lib/copy-acl.c
@@ -336,6 +336,16 @@
   did_chmod = 0; /* set to 1 once the mode bits in 0777 have been set */
   saved_errno = 0; /* the first non-ignorable error code */
 
+  if (!MODE_INSIDE_ACL)
+    {
+      /* On Cygwin, it is necessary to call chmod before acl, because
+	 chmod can change the contents of the ACL (in ways that don't
+	 change the allowed accesses, but still visible).  */
+      if (chmod_or_fchmod (dst_name, dest_desc, mode) != 0)
+	saved_errno = errno;
+      did_chmod = 1;
+    }
+
   /* If both ace_entries and entries are available, try SETACL before
      ACE_SETACL, because SETACL cannot fail with ENOTSUP whereas ACE_SETACL
      can.  */
@@ -345,7 +355,7 @@
       ret = (dest_desc != -1
 	     ? facl (dest_desc, SETACL, count, entries)
 	     : acl (dst_name, SETACL, count, entries));
-      if (ret < 0)
+      if (ret < 0 && saved_errno == 0)
 	{
 	  saved_errno = errno;
 	  if (errno == ENOSYS && !acl_nontrivial (count, entries))
@@ -373,8 +383,8 @@
   free (ace_entries);
 #  endif
 
-  if (!MODE_INSIDE_ACL
-      || did_chmod <= ((mode & (S_ISUID | S_ISGID | S_ISVTX)) ? 1 : 0))
+  if (MODE_INSIDE_ACL
+      && did_chmod <= ((mode & (S_ISUID | S_ISGID | S_ISVTX)) ? 1 : 0))
     {
       /* We did not call chmod so far, and either the mode and the ACL are
 	 separate or special bits are to be set which don't fit into ACLs.  */