chore: bump zip-stream

This commit is contained in:
Gregor Kleen 2020-09-10 15:09:26 +02:00
parent 350ee79af3
commit d2e8ac3a2a
3 changed files with 4 additions and 10 deletions

View File

@ -54,7 +54,7 @@ extra-deps:
- fastcdc
- git: git@gitlab2.rz.ifi.lmu.de:uni2work/zip-stream.git
commit: 094c70935f1d92016144cd4dfc0a99b831c56f25
commit: 843683d024f767de236f74d24a3348f69181a720
- generic-lens-1.2.0.0@sha256:b19e7970c93743a46bc3702331512a96d163de4356472f2d51a2945887aefe8c,6524 # manual downgrade; won't compile with >=2.0.0.0

View File

@ -228,11 +228,11 @@ packages:
git: git@gitlab2.rz.ifi.lmu.de:uni2work/zip-stream.git
pantry-tree:
size: 812
sha256: e191cb4e12ae1f056acdcf0393ff4dcb566b3ab82305aa14d6d4e35f49a64c96
commit: 094c70935f1d92016144cd4dfc0a99b831c56f25
sha256: 0da8bc38d73034962d2e2d1a7586b6dee848a629319fce9cbbf578348c61118c
commit: 843683d024f767de236f74d24a3348f69181a720
original:
git: git@gitlab2.rz.ifi.lmu.de:uni2work/zip-stream.git
commit: 094c70935f1d92016144cd4dfc0a99b831c56f25
commit: 843683d024f767de236f74d24a3348f69181a720
- completed:
hackage: generic-lens-1.2.0.0@sha256:b19e7970c93743a46bc3702331512a96d163de4356472f2d51a2945887aefe8c,6524
pantry-tree:

View File

@ -1,5 +1,3 @@
{-# OPTIONS_GHC -Wno-error=deprecations #-}
module Handler.Utils.ZipSpec where
import TestImport
@ -70,10 +68,6 @@ spec = describe "Zip file handling" $ do
acceptableTimeDifference t1 t2 = abs (diffUTCTime t1 t2) <= 2
forM_ (zipFiles `zip` zipFiles') $ \(file, file') -> do
when (((/=) `on` acceptableFilenameChanges) file' file) $ do
traceM $ show (fileTitle file, fileTitle file')
traceM $ show (acceptableFilenameChanges file, acceptableFilenameChanges file')
traceM $ show (isNothing $ fileContent file, isNothing $ fileContent file')
(shouldBe `on` acceptableFilenameChanges) file' file
(fileModified file', fileModified file) `shouldSatisfy` uncurry acceptableTimeDifference
(view _pureFileContent file' :: Maybe ByteString) `shouldBe` (view _pureFileContent file)