diff options
Diffstat (limited to 'Command.hs')
| -rw-r--r-- | Command.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command.hs b/Command.hs index cc9bcbf0c..c061c7c46 100644 --- a/Command.hs +++ b/Command.hs @@ -162,7 +162,7 @@ withNothing a [] = return [a] withNothing _ _ = error "This command takes no parameters." runFiltered :: (FilePath -> Annex (Maybe a)) -> Annex [FilePath] -> Annex [Annex (Maybe a)] -runFiltered a fs = runFilteredGen a id fs +runFiltered a = runFilteredGen a id backendPairs :: (BackendFile -> CommandStart) -> CommandSeek backendPairs a fs = runFilteredGen a snd (Backend.chooseBackends fs) |