@@ -3,6 +3,7 @@
33module Distribution.Nixpkgs.Haskell.FromCabal.License
44 ( fromCabalLicense
55 , fromSPDXLicense
6+ , isFreeLicense
67 ) where
78
89import Data.List (intercalate)
@@ -162,3 +163,8 @@ fromSPDXLicense (SPDX.License expr) =
162163 -- Not handled: compound expressions, not expressible in Nixpkgs.
163164 -- Use the SPDX expression as a free-form license string.
164165 Unknown (Just $ prettyShow expr)
166+
167+isFreeLicense :: Distribution.Nixpkgs.License.License -> Bool
168+isFreeLicense (Known "stdenv.lib.licenses.unfree") = False
169+isFreeLicense (Unknown Nothing) = False
170+isFreeLicense _ = True