Hlint: Error: Use .

This commit is contained in:
marko.kocic 2009-09-22 12:19:38 +00:00
parent cca81d199f
commit 3341ad197f

View File

@ -56,5 +56,5 @@ main = do [ base, pkgFile ] <- getArgs
mods <- mapM (allDeps base) pkgs mods <- mapM (allDeps base) pkgs
let deps = zip pkgs mods let deps = zip pkgs mods
let deps' = sortBy (comparing fst) deps let deps' = sortBy (comparing fst) deps
mapM_ print $ map fst $ sortBy (comparing $ length . snd) deps' mapM_ (print . fst) (sortBy (comparing $ length . snd) deps')