summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-09-04 21:37:13 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-09-04 21:37:13 -0400
commit344a36eaaf7221f63495da641995360bbda327e0 (patch)
treed12e4cf0e4c72d979e31134167e74b2562e2b05b
parent5fb17c2c28288ae2a663d2ce5ec32ff627d608b5 (diff)
fix warning
-rw-r--r--Logs/Location.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Logs/Location.hs b/Logs/Location.hs
index 1289af321..f751c00de 100644
--- a/Logs/Location.hs
+++ b/Logs/Location.hs
@@ -30,9 +30,9 @@ import Annex.UUID
{- Log a change in the presence of a key's value in current repository. -}
logStatus :: Key -> LogStatus -> Annex ()
-logStatus key status = do
+logStatus key s = do
u <- getUUID
- logChange key u status
+ logChange key u s
{- Log a change in the presence of a key's value in a repository. -}
logChange :: Key -> UUID -> LogStatus -> Annex ()