rename showProgress -> showProgressDots
This commit is contained in:
parent
ea90722aba
commit
bc0180da83
2 changed files with 6 additions and 6 deletions
|
@ -10,7 +10,7 @@ module Messages (
|
|||
showStart',
|
||||
showNote,
|
||||
showAction,
|
||||
showProgress,
|
||||
showProgressDots,
|
||||
metered,
|
||||
meteredBytes,
|
||||
showSideAction,
|
||||
|
@ -69,8 +69,8 @@ showAction :: String -> Annex ()
|
|||
showAction s = showNote $ s ++ "..."
|
||||
|
||||
{- Progress dots. -}
|
||||
showProgress :: Annex ()
|
||||
showProgress = handle q $
|
||||
showProgressDots :: Annex ()
|
||||
showProgressDots = handle q $
|
||||
flushed $ putStr "."
|
||||
|
||||
{- Shows a progress meter while performing a transfer of a key.
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue