Skip to content

Commit

Permalink
Silence hlint complaint
Browse files Browse the repository at this point in the history
  • Loading branch information
hseg committed Dec 31, 2024
1 parent 28ebef0 commit 9781b88
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion lib/GHCup/Utils/Parsers.hs
Original file line number Diff line number Diff line change
Expand Up @@ -384,7 +384,9 @@ fromVersion' (SetToolTag t') tool =


parseUrlSource :: String -> Either String [NewURLSource]
parseUrlSource s = (fromURLSource <$> parseUrlSource' s) <|> ((:[]) <$> parseNewUrlSource s) <|> (parseNewUrlSources s)
parseUrlSource s = (fromURLSource <$> parseUrlSource' s)
<|> ((:[]) <$> parseNewUrlSource s)
<|> parseNewUrlSources s

parseUrlSource' :: String -> Either String URLSource
parseUrlSource' "GHCupURL" = pure GHCupURL
Expand Down

0 comments on commit 9781b88

Please sign in to comment.