From: John Goerzen Date: Thu, 29 May 2008 07:08:26 +0000 (-0500) Subject: I think the child payload is fixed X-Git-Url: https://code.delx.au/offlineimap/commitdiff_plain/0e752c9bfb1c46c0c9174cc7fd410adab8c1ca46 I think the child payload is fixed --- diff --git a/src/Data/Syncable.hs b/src/Data/Syncable.hs index 5143630..c103224 100644 --- a/src/Data/Syncable.hs +++ b/src/Data/Syncable.hs @@ -187,7 +187,7 @@ findModified basestate authoritativestate comparisonstate laststate = (Just basev, Just authv) -> if (authv /= lastv) && (authv /= basev) then Just authv - else if compv /= basev + else if compv /= basev && (authv /= basev) then Just compv else Nothing