# HG changeset patch
# User HackBot
# Date 1370115105 0
# Node ID 00c8fbc8aae94b9dd1b2c6a0542e38da8c62bc90
# Parent  fbba3aa90a1688c3ed624def9f1f72d8c2ba6a5f
<oerjan> rm test.hs

diff -r fbba3aa90a16 -r 00c8fbc8aae9 test.hs
--- a/test.hs	Sat Jun 01 19:31:05 2013 +0000
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,2 +0,0 @@
-import Data.List (sort, stripPrefix)
-main = mapM_ putStrLn . map (\s -> head s ++ " occurs->" ++ show (length s)) . group . sort . catMaybes . map (stripPrefix "username:" . (!!2) . words) . lines =<< getContents