@@ -4,6 +4,7 @@ module Distribution.Nixpkgs.Haskell.FromCabal.Flags ( configureCabalFlags ) wher
44
55import Distribution.Nixpkgs.Haskell.OrphanInstances ( )
66
7+import Data.Char
78import Distribution.Package
89import Distribution.PackageDescription
910import Distribution.Version
@@ -57,7 +58,10 @@ configureCabalFlags' (PackageIdentifier name version)
5758 | otherwise = []
5859
5960enable :: String -> (FlagName,Bool)
60−enable name = (mkFlagName name, True)
61+enable name = (mkFlagName' name, True)
6162
6263disable :: String -> (FlagName,Bool)
63−disable name = (mkFlagName name, False)
64+disable name = (mkFlagName' name, False)
65+
66+mkFlagName' :: String -> FlagName
67+mkFlagName' = mkFlagName . map toLower