diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-08-25 21:41:10 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-08-25 21:41:10 -0400 |
| commit | fffeb8e983e2a7bc2f6c097de36572b6b038bfe5 (patch) | |
| tree | 71ff630a8f2f0771a4da8a299e479dd4772cbe69 /Command | |
| parent | 05839bd029e5ab1fe511e2c71dcd2f9f166da0a7 (diff) | |
whitespace
Diffstat (limited to 'Command')
| -rw-r--r-- | Command/Unused.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Unused.hs b/Command/Unused.hs index 68b591cf3..907e7bd07 100644 --- a/Command/Unused.hs +++ b/Command/Unused.hs @@ -272,7 +272,7 @@ withKeysReferencedInGit a = withKeysReferencedInGitRef :: (Key -> Annex ()) -> Git.Ref -> Annex () withKeysReferencedInGitRef a ref = do showAction $ "checking " ++ Git.Ref.describe ref - (ts,clean) <- inRepo $ DiffTree.diffIndex ref + (ts, clean) <- inRepo $ DiffTree.diffIndex ref -- if 'dstsha' is 0{40}, the key will be Nothing forM_ ts $ catObject . DiffTree.dstsha >=> encodeW8 . L.unpack *>=> |