(file-cache-add-directory-using-find):

Only test file-cache-find-command-posix-flag on some systems.

diff --git a/lisp/filecache.el b/lisp/filecache.el
index bd0b0f777817e85b7c0ec1bcc5749a523c3ab036..df1f1b548d04ad73e25cdf676000ca8c619fefdd 100644 (file)
--- a/lisp/filecache.el
+++ b/lisp/filecache.el
@@ -345,13 +345,11 @@ Find is run in DIRECTORY."
     (call-process file-cache-find-command nil
                  (get-buffer file-cache-buffer) nil
                  dir "-name"
-                  (cond
-                   (file-cache-find-command-posix-flag
-                    "\\*")
-                   ((eq system-type 'windows-nt)
-                    "'*'")
-                   (t
-                    "*"))
+                 (if (memq system-type '(windows-nt cygwin))
+                     (if file-cache-find-command-posix-flag
+                         "\\*"
+                       "'*'")
+                   "*")
                  "-print")
     (file-cache-add-from-file-cache-buffer)))