hasufell/ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix #603, stack path output can have missing values

Browse Source
This commit is contained in:
Daniel Gröber 2015-09-16 05:18:53 +02:00
parent 24050e5af3
commit 46891f13ee
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Language/Haskell/GhcMod/Stack.hs
View File

@ -58,6 +58,7 @@ getStackEnv projdir = U.withDirectory_ projdir $ runMaybeT $ do
} }
where where
liToTup [k,v] = (k,v) liToTup [k,v] = (k,v)
liToTup [k] = (k, error "getStackEnv: missing key '"++k++"'")
liToTup _ = error "getStackEnv" liToTup _ = error "getStackEnv"
getStackGhcPath :: IOish m => StackEnv -> m (Maybe FilePath) getStackGhcPath :: IOish m => StackEnv -> m (Maybe FilePath)