mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix wrong type

Browse source 
Use of Typeable means the type checker can't catch this kind of mistake,
the error is deferred to runtime.

testremote now passes on a directory special remote
This commit is contained in:
Joey Hess 2020-01-14 13:05:38 -04:00
parent 963239da5c
commit 8f142a9279
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Remote/Helper/Chunked.hs
View file

@ -60,8 +60,8 @@ getChunkConfig c =
case getRemoteConfigValue chunksizeField c of case getRemoteConfigValue chunksizeField c of
Nothing -> case getRemoteConfigValue chunkField c of Nothing -> case getRemoteConfigValue chunkField c of
Nothing -> NoChunks Nothing -> NoChunks
Just v -> readsz UnpaddedChunks (fromProposedAccepted v) chunkField Just v -> readsz UnpaddedChunks v chunkField
Just v -> readsz LegacyChunks (fromProposedAccepted v) chunksizeField Just v -> readsz LegacyChunks v chunksizeField
where where
readsz mk v f = case readSize dataUnits v of readsz mk v f = case readSize dataUnits v of
Just size Just size