use action, not sideAction

sideAction is for things not generally related to the current action being
performed. And, it adds a newline after the side action. This was not the
right thing to use for stuff like "checksum", where doing a checksum is
part of the git annex get process, and indeed we want it to display
"(checksum...) ok"
This commit is contained in:
Joey Hess 2015-10-11 13:29:44 -04:00
parent bddff249ae
commit fa9333e99f
Failed to extract signature
6 changed files with 6 additions and 6 deletions

View file

@ -115,7 +115,7 @@ getCache :: Maybe String -> Annex Cache
getCache opttemplate = ifM (Annex.getState Annex.force)
( ret S.empty S.empty
, do
showSideAction "checking known urls"
showAction "checking known urls"
(is, us) <- unzip <$> (mapM knownItems =<< knownUrls)
ret (S.fromList us) (S.fromList (concat is))
)

View file

@ -63,7 +63,7 @@ start :: Int -> RemoteName -> CommandStart
start basesz name = do
showStart "testremote" name
r <- either error id <$> Remote.byName' name
showSideAction "generating test keys"
showAction "generating test keys"
fast <- Annex.getState Annex.fast
ks <- mapM randKey (keySizes basesz fast)
rs <- catMaybes <$> mapM (adjustChunkSize r) (chunkSizes basesz fast)

View file

@ -39,7 +39,7 @@ start ps = do
perform :: View -> CommandPerform
perform view = do
showSideAction "searching"
showAction "searching"
next $ checkoutViewBranch view applyView
paramView :: String