include remote name for consistency with export output

This commit is contained in:
Joey Hess 2019-03-11 14:46:37 -04:00
parent e1ab9a6d41
commit c714a260a9
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -266,7 +266,7 @@ downloadImport remote importtreeconfig importablecontents = do
[] -> do
job <- liftIO $ newEmptyTMVarIO
let downloadaction = do
showStart "import" (fromImportLocation loc)
showStart ("import " ++ Remote.name remote) (fromImportLocation loc)
next $ tryNonAsync (download cidmap db i) >>= \case
Left e -> next $ do
warning (show e)