diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-12-28 16:00:19 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-12-28 16:00:19 -0400 |
| commit | 5499d84e79f7a210161b6a7f9d4d5c0d40dd43b4 (patch) | |
| tree | ef0133386eb022d501f97407968ccba0d917be18 | |
| parent | 5c2c30c43499683a0030617515e926bd60c8eab1 (diff) | |
fix logic error breaking direct mode assistant autocommit of modified files
| -rw-r--r-- | Annex/Content/Direct.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/Content/Direct.hs b/Annex/Content/Direct.hs index 75cdaad79..778a86f0a 100644 --- a/Annex/Content/Direct.hs +++ b/Annex/Content/Direct.hs @@ -84,7 +84,7 @@ changedFileStatus :: Key -> FileStatus -> Annex Bool changedFileStatus key status = do old <- recordedCache key let curr = toCache status - return $ curr == old + return $ curr /= old {- Gets the recorded cache for a key. -} recordedCache :: Key -> Annex (Maybe Cache) |