Bug#869520: git-annex FTBFS: The constructor `S3.UploadPartResponse' should have 1 argument, but has been given 2

[Adrian Bunk]

Source: git-annex
Version: 6.20170101-1
Severity: serious
Tags: buster sid

git-annex FTBFS in unstable:

https://tests.reproducible-builds.org/debian/rb-pkg/unstable/amd64/git-annex.html

...
[327 of 548] Compiling Remote.S3        ( Remote/S3.hs, 
dist/build/git-annex/git-annex-tmp/Remote/S3.o )

Remote/S3.hs:224:49: error:
    * The constructor `S3.UploadPartResponse' should have 1 argument, but has 
been given 2
    * In the pattern: S3.UploadPartResponse _ etag
      In a stmt of a 'do' block:
        S3.UploadPartResponse _ etag <- sendS3Handle h req
      In the expression:
        do { let sz = ...;
             let p' = offsetMeterUpdate p (toBytesProcessed pos);
             let numchunks
                   = ceiling
                       (fromIntegral sz / fromIntegral defaultChunkSize :: 
Double);
             let popper = handlePopper numchunks defaultChunkSize p' fh;
             .... }
Makefile:26: recipe for target 'git-annex' failed
make[1]: *** [git-annex] Error 1