@@ -183,6 +183,7 @@ main = do
183183 it ("can build in " <> shellName) $ inTmpObInit $ \_ -> inShell $ "cabal new-build --" <> fromString compiler <> " all"
184184
185185 it "has idempotent thunk update" $ inTmpObInit $ \_ -> do
186+ _ <- pack
186187 u <- update
187188 uu <- update
188189 assertRevEQ u uu
@@ -190,6 +191,7 @@ main = do
190191 describe "ob thunk pack/unpack" $ parallel $ do
191192 it "has thunk pack and unpack inverses" $ inTmpObInit $ \_ -> do
192193
194+ _ <- pack
193195 e <- commitAll
194196 eu <- unpack
195197 eup <- pack
@@ -227,7 +229,6 @@ main = do
227229 testThunkPack $ fromText repo
228230
229231 it "aborts thunk pack when there are uncommitted files" $ inTmpObInit $ \dir -> do
230− void unpack
231232 testThunkPack (dir </> thunk)
232233
233234 describe "ob thunk update --branch" $ parallel $ do