@@ -152,10 +152,9 @@ instance (NFData v) => NFData (MaybeDefault v) where
152152 rnf (SetTo v) = rnf v
153153
154154instance Eq v => Semigroup (MaybeDefault v) where
155− _ <> v@(SetTo _) = v
156− x <> KeepCurrent = x
157− Default <> _ = Default
158− _ <> Default = Default
155+ _ <> v@(SetTo _) = v
156+ x <> KeepCurrent = x
157+ _ <> Default = Default
159158
160159instance Eq v => Monoid ( MaybeDefault v ) where
161160 mempty = KeepCurrent