Fuse maps

2025-08-08 01:28:34 +08:00 · 2020-12-28 18:10:47 -05:00
parent 953d9bc56d
commit 2cfd1f2714
2 changed files with 2 additions and 2 deletions
--- a/shellcheck.hs
+++ b/shellcheck.hs
@@ -507,7 +507,7 @@ ioInterface options files = do
      where
        find filename deflt = do
            sources <- findM ((allowable inputs) `andM` doesFileExist) $
-                        (adjustPath filename):(map (</> filename) $ map adjustPath $ sourcePathFlag ++ sourcePathAnnotation)
+                        (adjustPath filename):(map ((</> filename) . adjustPath) $ sourcePathFlag ++ sourcePathAnnotation)
            case sources of
                Nothing -> return deflt
                Just first -> return first