@@ -11,5 +11,7 @@ configureFlags (PackageIdentifier (PackageName name) _)
11enable :: String -> (FlagName,Bool)
11enable :: String -> (FlagName,Bool)
12enable name = (FlagName name, True)
12enable name = (FlagName name, True)
14+-- Uncommend this function when it's actually used.
14−disable :: String -> (FlagName,Bool)
16+-- disable :: String -> (FlagName,Bool)
15−disable name = (FlagName name, False)
17+-- disable name = (FlagName name, False)