1
1
mirror of https://github.com/nmattia/niv.git synced 2024-09-18 19:07:19 +03:00

Don't drop nulls

This commit is contained in:
Nicolas Mattia 2019-06-15 13:12:20 +00:00
parent 312300cca8
commit 8349f3e55e
2 changed files with 2 additions and 13 deletions

View File

@ -90,19 +90,7 @@ newtype PackageSpec = PackageSpec { unPackageSpec :: Aeson.Object }
-- | Simply discards the 'Freedom'
attrsToSpec :: Attrs -> PackageSpec
attrsToSpec = PackageSpec . dropNulls . fmap snd
where
dropNulls
:: HMS.HashMap T.Text Aeson.Value
-> HMS.HashMap T.Text Aeson.Value
dropNulls = HMS.mapMaybe $ \case
x@Aeson.Object{} -> Just x
x@Aeson.Array{} -> Just x
x@Aeson.String{} -> Just x
x@Aeson.Number{} -> Just x
x@Aeson.Bool{} -> Just x
Aeson.Null -> Nothing
attrsToSpec = PackageSpec . fmap snd
parsePackageSpec :: Opts.Parser PackageSpec
parsePackageSpec =

View File

@ -1,5 +1,6 @@
{
"nixpkgs": {
"homepage": null,
"url": "http://localhost:3333/NixOS/nixpkgs-channels/archive/571b40d3f50466d3e91c1e609d372de96d782793.tar.gz",
"owner": "NixOS",
"branch": "nixos-18.09",