hasufell/ghcup-hs
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix failure mode when metadata is garbage, fixes #921

Browse Source
This commit is contained in:
Julian Ospald 2023-11-12 17:11:16 +08:00
parent 4132447e04
commit 6a86e9e77e
No known key found for this signature in database
GPG Key ID: 4275CDA6A29BED43
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/GHCup/Types/Stack.hs
View File

@ -50,7 +50,7 @@ instance FromJSON SetupInfo where
siSevenzExe <- o .:? "sevenzexe-info" siSevenzExe <- o .:? "sevenzexe-info"
siSevenzDll <- o .:? "sevenzdll-info" siSevenzDll <- o .:? "sevenzdll-info"
siMsys2 <- o .:? "msys2" .!= mempty siMsys2 <- o .:? "msys2" .!= mempty
siGHCs <- o .:? "ghc" .!= mempty siGHCs <- o .: "ghc"
siStack <- o .:? "stack" .!= mempty siStack <- o .:? "stack" .!= mempty
pure SetupInfo {..} pure SetupInfo {..}