From b00c923065e367afd5b7a7cc068b049bb1ed25e1 Mon Sep 17 00:00:00 2001 From: Alexander Todorov Date: Thu, 5 Jul 2018 17:29:45 +0300 Subject: [PATCH] [test] Modify function return type this should pass all unit tests but cause bdcs build to fail --- Codec/RPM/Conduit.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/Codec/RPM/Conduit.hs b/Codec/RPM/Conduit.hs index 063725c..5a0923f 100644 --- a/Codec/RPM/Conduit.hs +++ b/Codec/RPM/Conduit.hs @@ -52,7 +52,6 @@ payloadC = awaitForever (yield . rpmArchive) -- | Extract the package payload from an 'RPM', decompress it, and return each element of -- the payload as a 'Data.CPIO.Entry'. -payloadContentsC :: (MonadResource m, MonadThrow m) => Conduit RPM m Entry +payloadContentsC :: (MonadResource m, MonadThrow m) => Conduit RPM m C.ByteString payloadContentsC = payloadC .| decompress Nothing - .| readCPIO