cf07a2c412
There was confusion in different parts of the progress bar code about whether an update contained the total number of bytes transferred, or the number of bytes transferred since the last update. One way this bug showed up was progress bars that seemed to stick at zero for a long time. In order to fix it comprehensively, I add a new BytesProcessed data type, that is explicitly a total quantity of bytes, not a delta. Note that this doesn't necessarily fix every problem with progress bars. Particularly, buffering can now cause progress bars to seem to run ahead of transfers, reaching 100% when data is still being uploaded.
30 lines
496 B
Haskell
30 lines
496 B
Haskell
{- git-annex abstract data types
|
|
-
|
|
- Copyright 2010 Joey Hess <joey@kitenet.net>
|
|
-
|
|
- Licensed under the GNU GPL version 3 or higher.
|
|
-}
|
|
|
|
module Types (
|
|
Annex,
|
|
Backend,
|
|
Key,
|
|
UUID(..),
|
|
GitConfig(..),
|
|
RemoteGitConfig(..),
|
|
Remote,
|
|
RemoteType,
|
|
Option
|
|
) where
|
|
|
|
import Annex
|
|
import Types.Backend
|
|
import Types.GitConfig
|
|
import Types.Key
|
|
import Types.UUID
|
|
import Types.Remote
|
|
import Types.Option
|
|
|
|
type Backend = BackendA Annex
|
|
type Remote = RemoteA Annex
|
|
type RemoteType = RemoteTypeA Annex
|