Use less modern APIs to support more GHC versions
This commit is contained in:
parent
4dfb3fce9c
commit
bbe5155e63
|
@ -438,7 +438,7 @@ ioInterface options files = do
|
|||
return [home, xdg]
|
||||
|
||||
readConfig file = do
|
||||
exists <- doesPathExist file
|
||||
exists <- doesFileExist file
|
||||
if exists
|
||||
then do
|
||||
(contents, _) <- inputFile file `catch` handler file
|
||||
|
|
Loading…
Reference in New Issue