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