src: drop unused DeriveDataTypeable

2015-11-03 16:49:52 +04:00
parent 34d84e389b
commit de12b61d77
3 changed files with 3 additions and 3 deletions
--- a/src/GHCMod.hs
+++ b/src/GHCMod.hs
@@ -48,7 +48,7 @@ optionUsage :: (String -> String) -> [OptDescr a] -> [String]
 optionUsage indent opts = concatMap optUsage opts
 where
   optUsage (Option so lo dsc udsc) =
-       [ concat $ intersperse ", " $ addLabel `map` allFlags
+       [ intercalate ", " $ addLabel `map` allFlags
       , indent $ udsc
       , ""
       ]