From dfa76069d45adff2c3edf79b184d6767b2bbe6bb Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sat, 7 Jan 2012 00:22:16 -0400 Subject: reap zombies --- Command/Log.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/Command/Log.hs b/Command/Log.hs index 32f03471a..8505fd16a 100644 --- a/Command/Log.hs +++ b/Command/Log.hs @@ -56,6 +56,7 @@ seek = [withValue (concat <$> mapM getoption options) $ \os -> start :: [CommandParam] -> FilePath -> (Key, Backend) -> CommandStart start os file (key, _) = do showLog file =<< readLog <$> getLog key os + liftIO Git.Command.reap stop showLog :: FilePath -> [RefChange] -> Annex () -- cgit v1.2.3