separate RemoteConfig parsing basically working

Many special remotes are not updated yet and are commented out.
This commit is contained in:
Joey Hess 2020-01-14 12:35:08 -04:00
parent 71f78fe45d
commit 963239da5c
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
26 changed files with 282 additions and 212 deletions

View file

@ -28,7 +28,6 @@ import Utility.Metered
import Crypto (EncKey)
import Backend (isStableKey)
import Annex.SpecialRemote.Config
import Config.RemoteConfig
import qualified Data.ByteString.Lazy as L
@ -52,8 +51,8 @@ noChunks _ = False
chunkConfigParser :: [RemoteConfigParser]
chunkConfigParser =
[ optStringParser chunksizeField
, optStringParser chunkField
[ optionalStringParser chunksizeField
, optionalStringParser chunkField
]
getChunkConfig :: ParsedRemoteConfig -> ChunkConfig