diff options
Diffstat (limited to 'Command/Wanted.hs')
| -rw-r--r-- | Command/Wanted.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Command/Wanted.hs b/Command/Wanted.hs index a7b4a3d9e..9ea0c211f 100644 --- a/Command/Wanted.hs +++ b/Command/Wanted.hs @@ -8,9 +8,11 @@ module Command.Wanted where import Common.Annex +import qualified Annex import Command import qualified Remote import Logs.PreferredContent +import Types.Messages import qualified Data.Map as M @@ -36,6 +38,7 @@ start = parse performGet :: UUID -> CommandPerform performGet uuid = do + Annex.setOutput QuietOutput m <- preferredContentMapRaw liftIO $ putStrLn $ fromMaybe "" $ M.lookup uuid m next $ return True |