From 93c17607b58b9f128af0e8a59f99b5919b337a86 Mon Sep 17 00:00:00 2001 From: Julian Ospald Date: Tue, 15 Sep 2020 17:44:30 +0200 Subject: [PATCH] Fix haddock build, fixes #62 --- app/ghcup-gen/Validate.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/app/ghcup-gen/Validate.hs b/app/ghcup-gen/Validate.hs index 9c4b7d0..e67096c 100644 --- a/app/ghcup-gen/Validate.hs +++ b/app/ghcup-gen/Validate.hs @@ -55,7 +55,7 @@ validate :: (Monad m, MonadLogger m, MonadThrow m, MonadIO m, MonadUnliftIO m) validate dls = do ref <- liftIO $ newIORef 0 - -- * verify binary downloads * -- + -- verify binary downloads -- flip runReaderT ref $ do -- unique tags forM_ (M.toList dls) $ \(t, _) -> checkUniqueTags t