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