diff options
author | Joey Hess <joeyh@joeyh.name> | 2015-04-05 12:50:02 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2015-04-05 12:50:02 -0400 |
commit | 2ccd9c5e7cf3266d2270741e1535d78350afcee9 (patch) | |
tree | 3e933e4ccf7f53f7f9972fc6c01d6de83d643d28 /Logs/Presence.hs | |
parent | b855580614852c7558fb2aad387609d15c4b0c6b (diff) |
rethought distributed fsck; instead add activity.log and expire command
This is much more space efficient!
Diffstat (limited to 'Logs/Presence.hs')
-rw-r--r-- | Logs/Presence.hs | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/Logs/Presence.hs b/Logs/Presence.hs index 469ed8de9..60e0c542a 100644 --- a/Logs/Presence.hs +++ b/Logs/Presence.hs @@ -16,7 +16,6 @@ module Logs.Presence ( addLog, readLog, logNow, - logThen, currentLog, currentLogInfo, historicalLogInfo, @@ -44,9 +43,6 @@ logNow s i = do now <- liftIO getPOSIXTime return $ LogLine now s i -logThen :: POSIXTime -> LogStatus -> String -> Annex LogLine -logThen t s i = return $ LogLine t s i - {- Reads a log and returns only the info that is still in effect. -} currentLogInfo :: FilePath -> Annex [String] currentLogInfo file = map info <$> currentLog file |