add startingNoMessage

Fixes the last wart in the StartMessage transition. A few commands
include other CommandStart actions that generate output, and
do not themselves need to display a start/end message.
This commit is contained in:
Joey Hess 2019-06-12 14:11:23 -04:00
parent 70bc30acb1
commit ba2551da6f
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
6 changed files with 17 additions and 7 deletions

View file

@ -630,7 +630,7 @@ seekSyncContent o rs currbranch = do
-- Run syncFile as a command action so file transfers run
-- concurrently.
let ai = OnlyActionOn k (ActionItemKey k)
commandAction $ startingCustomOutput ai $ do
commandAction $ startingNoMessage ai $ do
whenM (syncFile ebloom rs af k) $
void $ liftIO $ tryPutMVar mvar ()
next $ return True