unify elipsis handling
And add a simple dots-based progress display, currently only used in v2 upgrade.
This commit is contained in:
parent
ec9e9343d9
commit
00153eed48
22 changed files with 76 additions and 62 deletions
|
@ -72,7 +72,7 @@ shaNameE size = shaName size ++ "E"
|
|||
|
||||
shaN :: SHASize -> FilePath -> Annex String
|
||||
shaN size file = do
|
||||
showNote "checksum..."
|
||||
showAction "checksum"
|
||||
liftIO $ pOpen ReadFromPipe command (toCommand [File file]) $ \h -> do
|
||||
line <- hGetLine h
|
||||
let bits = split " " line
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue