Fix some warnings (ghc 8)

2016-02-14 12:35:57 +01:00
parent be6ba3f875
commit d3f66500ed
3 changed files with 12 additions and 14 deletions
--- a/Language/Haskell/GhcMod/Stack.hs
+++ b/Language/Haskell/GhcMod/Stack.hs
@@ -75,12 +75,12 @@ findExecutablesInStackBinPath exe StackEnv {..} =

 findExecutablesInDirectories' :: [FilePath] -> String -> IO [FilePath]
 findExecutablesInDirectories' path binary =
-    U.findFilesWith' isExecutable path (binary <.> exeExtension)
+    U.findFilesWith' isExecutable path (binary <.> exeExtension')
   where isExecutable file = do
             perms <- getPermissions file
             return $ executable perms

-         exeExtension = if isWindows then "exe" else ""
+         exeExtension' = if isWindows then "exe" else ""

 readStack :: (IOish m, GmOut m, GmLog m) => [String] -> MaybeT m String
 readStack args = do