From 9a46895f2ef487786cb38fe9e1c4cc5e3dce2747 Mon Sep 17 00:00:00 2001 From: Nicolas Mattia Date: Thu, 31 Jan 2019 20:42:39 +0100 Subject: [PATCH] Enable build warnings --- Main.hs | 4 ++-- package.yaml | 4 ++++ 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/Main.hs b/Main.hs index c21ed9b..6b33a2b 100644 --- a/Main.hs +++ b/Main.hs @@ -81,7 +81,7 @@ parsePackageName :: Opts.Parser PackageName parsePackageName = PackageName <$> Opts.argument Opts.str (Opts.metavar "PACKAGE") -newtype PackageSpec = PackageSpec { unPackageSpec :: Aeson.Object } +newtype PackageSpec = PackageSpec { _unPackageSpec :: Aeson.Object } deriving newtype (FromJSON, ToJSON, Show, Semigroup, Monoid) parsePackageSpec :: Opts.Parser PackageSpec @@ -422,7 +422,7 @@ cmdUpdate = \case versionsSpec' <- forWithKeyM versionsSpec $ \packageName packageSpec -> do putStrLn $ "Package: " <> unPackageName packageName - updatePackageSpec packageSpec + updatePackageSpec =<< completePackageSpec packageSpec setVersionsSpec $ VersionsSpec versionsSpec' diff --git a/package.yaml b/package.yaml index ce803b8..9c9ae8b 100644 --- a/package.yaml +++ b/package.yaml @@ -1,5 +1,9 @@ name: niv +ghc-options: + - -Wall + - -Werror + executable: source-dirs: . # remove when https://github.com/nmattia/snack/pull/96 is merged main: Main.hs