compilation fixes

[offlineimap] / testsrc / runtests.hs

diff --git a/testsrc/runtests.hs b/testsrc/runtests.hs
index 5d5312e850e7f92da78858c51fcf2288c8aae4ab..0b7f44aba397cb0bb42463f8a6a19af398f6503c 100644 (file)
--- a/testsrc/runtests.hs
+++ b/testsrc/runtests.hs
@@ -185,13 +185,6 @@ prop_diffCollection coll1 coll2 =
         newcoll2 = unaryApplyChanges coll1 commands
         in coll2 @=? newcoll2
 
-prop_modifyToSyncSimple :: SyncCollection Int Word8 -> Word8 -> Result
-prop_modifyToSyncSimple base newv
-    | Map.empty base = True @=? True
-    | otherwise = ([], [], [ModifyContent @=?
-    where k = fst . head . Map.toList base
-prop_modifyToSync 
-
 q :: Testable a => String -> a -> HU.Test
 q = qccheck (defaultConfig {configMaxTest = 250})