refactor
This commit is contained in:
parent
d75da353b9
commit
4bf1a5ef59
9 changed files with 39 additions and 28 deletions
|
@ -184,7 +184,7 @@ getKeysReferenced = do
|
|||
staleKeysPrune :: (Git.Repo -> FilePath) -> [Key] -> Annex [Key]
|
||||
staleKeysPrune dirspec present = do
|
||||
contents <- staleKeys dirspec
|
||||
|
||||
|
||||
let stale = contents `exclude` present
|
||||
let dup = contents `exclude` stale
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue