status: In local mode, displays information about variance from configured numcopies levels.

This commit is contained in:
Joey Hess 2013-09-15 19:10:38 -04:00
parent 5c71dc1087
commit a3bbda5bed
4 changed files with 50 additions and 9 deletions

View file

@ -111,7 +111,7 @@ numCopies file = do
Just n -> return $ Just n
Nothing -> readish <$> checkAttr "annex.numcopies" file
numCopiesCheck :: FilePath -> Key -> (Int -> Int -> Bool) -> Annex Bool
numCopiesCheck :: FilePath -> Key -> (Int -> Int -> v) -> Annex v
numCopiesCheck file key vs = do
numcopiesattr <- numCopies file
needed <- getNumCopies numcopiesattr