diff options
author | 2013-09-04 21:45:47 -0400 | |
---|---|---|
committer | 2013-09-04 21:45:47 -0400 | |
commit | 09bd4393d971f3d069c5e67f9a9bb34d1e6480b2 (patch) | |
tree | e42dc2b33bbe997cb1dbdc606a91ef3d4eb11b35 | |
parent | d37f6b5def1a9e75da44df46df4e9b5cd2af4962 (diff) | |
parent | 344a36eaaf7221f63495da641995360bbda327e0 (diff) |
Merge branch 'master' into encryption
-rw-r--r-- | Logs/Location.hs | 4 |
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 () |