diff options
author | Joey Hess <joeyh@joeyh.name> | 2015-04-03 13:51:32 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2015-04-03 13:51:32 -0400 |
commit | bc0180da8315bb28bb21a8b61d76fbbc5d5b838d (patch) | |
tree | 3ce1a8e9a45ba95bc8dae988a6d0aa72cfa8def0 /Messages.hs | |
parent | ea90722aba4b8972b9d66c3a0d22a1a79360740d (diff) |
rename showProgress -> showProgressDots
Diffstat (limited to 'Messages.hs')
-rw-r--r-- | Messages.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Messages.hs b/Messages.hs index 88a4a8c18b..a8816218c4 100644 --- a/Messages.hs +++ b/Messages.hs @@ -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. |