Merge from origin/emacs-27

d6a0b66a0c (origin/emacs-27) * lisp/subr.el (save-match-data): Clarif...
1a6d59eeba Improve the documentation of setting up fontsets
c7737d40f2 ; * etc/TODO (Ligatures): Update the entry based on recent...
fb2e34cd21 ; * etc/TODO (Ligatures): Update the entry based on recent...
13b6dfd4f7 * doc/emacs/killing.texi (Rectangles): Improve indexing.
a10254dd46 Fix accessing files on networked drives on MS-Windows

1 files changed, 11 insertions, 1 deletions

diff --git a/src/w32.c b/src/w32.c
index 0f69e652a57..f391f5e26eb 100644
--- a/src/w32.c
+++ b/src/w32.c
@@ -6519,7 +6519,15 @@ acl_get_file (const char *fname, acl_type_t type)
               if (!get_file_security (fname, si, psd, sd_len, &sd_len))
                 {
                   xfree (psd);
-                  errno = EIO;
+                  err = GetLastError ();
+                  if (err == ERROR_NOT_SUPPORTED)
+                    errno = ENOTSUP;
+                  else if (err == ERROR_FILE_NOT_FOUND
+                           || err == ERROR_PATH_NOT_FOUND
+                           || err == ERROR_INVALID_NAME)
+                    errno = ENOENT;
+                  else
+                    errno = EIO;
                   psd = NULL;
                 }
             }
@@ -6530,6 +6538,8 @@ acl_get_file (const char *fname, acl_type_t type)
                       be encoded in the current ANSI codepage. */
                    || err == ERROR_INVALID_NAME)
             errno = ENOENT;
+          else if (err == ERROR_NOT_SUPPORTED)
+            errno = ENOTSUP;
           else
             errno = EIO;
         }