summaryrefslogtreecommitdiff
path: root/Logs/Presence.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-06-29 10:00:05 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-06-29 10:00:05 -0400
commit29335bf32685ee665f9ec5acbcfe7f8edabd1b96 (patch)
tree87b11ade25aa99712df020063221ecd6af43b771 /Logs/Presence.hs
parentcd0ab91c91e84b726dbc3da39e57893bd1417ee9 (diff)
pointlessness
Diffstat (limited to 'Logs/Presence.hs')
-rw-r--r--Logs/Presence.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Logs/Presence.hs b/Logs/Presence.hs
index 933426718..e75e1e4e6 100644
--- a/Logs/Presence.hs
+++ b/Logs/Presence.hs
@@ -48,7 +48,7 @@ addLog file line = Annex.Branch.change file $ \s ->
{- Reads a log file.
- Note that the LogLines returned may be in any order. -}
readLog :: FilePath -> Annex [LogLine]
-readLog file = parseLog <$> Annex.Branch.get file
+readLog = parseLog <$$> Annex.Branch.get
{- Parses a log file. Unparseable lines are ignored. -}
parseLog :: String -> [LogLine]