From: Po Lu <luangruo@yahoo.com>
Date: Wed, 19 Jul 2023 07:03:12 +0000 (+0000)
Subject: Port file-name-case-insensitive-p to Haiku
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fb5e43040fed987418e8855c677aa44e36f67e33;p=emacs.git

Port file-name-case-insensitive-p to Haiku

* src/fileio.c (file_name_case_insensitive_err): Don't return
errno upon failure, just 1, since errno is not used in the sole
caller.
---

diff --git a/src/fileio.c b/src/fileio.c
index 0a967a6631f..663d89b9dfc 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -2525,7 +2525,7 @@ internal_delete_file (Lisp_Object filename)
 #endif
 
 /* Return -1 if FILE is a case-insensitive file name, 0 if not,
-   and a positive errno value if the result cannot be determined.  */
+   and 1 if the result cannot be determined.  */
 
 static int
 file_name_case_insensitive_err (Lisp_Object file)
@@ -2559,7 +2559,7 @@ file_name_case_insensitive_err (Lisp_Object file)
     return - (res == 0);
 # endif
   if (errno != EINVAL)
-    return errno;
+    return 1;
 #endif
 
 #if defined CYGWIN || defined DOS_NT