1 2 3 4 5 6 7 8 9 10
{- git-annex main program - -} import LocationLog import GitRepo main = do gitPrep l <- readLog "demo.log" writeLog "demo2.log" $ compactLog l