Fix a few warnings

此提交包含在:
Daniel Gröber
2015-04-14 21:39:11 +02:00
父節點 95b16ded6d
當前提交 fb19d021ca
共有 2 個檔案被更改,包括 5 行新增4 行删除

查看文件

@@ -27,14 +27,14 @@ import Data.Char
import Language.Haskell.GhcMod.Error
import Language.Haskell.GhcMod.Monad.Types
import Exception
import System.Directory (getCurrentDirectory, setCurrentDirectory, doesFileExist)
import System.Directory (getCurrentDirectory, setCurrentDirectory, doesFileExist,
getTemporaryDirectory, canonicalizePath, doesFileExist)
import System.Process (readProcess)
import System.Directory (getTemporaryDirectory)
import System.Directory ()
import System.FilePath (splitDrive, takeDirectory, takeFileName, pathSeparators,
(</>))
import System.IO.Temp (createTempDirectory)
import System.Environment
import System.Directory
import Text.Printf
import Paths_ghc_mod (getLibexecDir)
@@ -161,6 +161,7 @@ getExecutablePath' = getExecutablePath
getExecutablePath' = getProgName
#endif
canonFilePath :: FilePath -> IO FilePath
canonFilePath f = do
p <- canonicalizePath f
e <- doesFileExist p