diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,7 @@
+## Path IO 1.6.2
+
+* Fixed a bug in the `findFilesWith` and based on it `findFiles` functions.
+
 ## Path IO 1.6.1
 
 * Fixed a space leak in `walkDirAccum`. [Issue
diff --git a/Path/IO.hs b/Path/IO.hs
--- a/Path/IO.hs
+++ b/Path/IO.hs
@@ -1242,7 +1242,7 @@
 findFilesWith _ [] _ = return []
 findFilesWith f (d : ds) file = do
   bfile <- (</> file) <$> makeAbsolute d
-  exist <- doesFileExist file
+  exist <- doesFileExist bfile
   b <- if exist then f bfile else return False
   if b
     then (bfile :) <$> findFilesWith f ds file
diff --git a/path-io.cabal b/path-io.cabal
--- a/path-io.cabal
+++ b/path-io.cabal
@@ -1,6 +1,6 @@
 cabal-version:   1.18
 name:            path-io
-version:         1.6.1
+version:         1.6.2
 license:         BSD3
 license-file:    LICENSE.md
 maintainer:      Mark Karpov <markkarpov92@gmail.com>