Mercurial > repo

comparison test.hs @ 3016:c97aaefa412b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<oerjan> fetch http://oerjan.nvg.org/test.hs
author HackBot
date Sat, 01 Jun 2013 19:29:25 +0000
parents
children fbba3aa90a16
comparison
equal deleted inserted replaced
3015:85305bc810af 3016:c97aaefa412b
1 import Data.List (sort)
2 main = mapM_ putStrLn . map (\s -> head s ++ " occurs->" ++ show (length s)) . group . sort . catMaybes . map (stripPrefix "username:" . (!!2) . words) . lines =<< getContents