@@ -25,7 +25,7 @@ import Data.Tuple
25-- * The same source key may not be moved to two destination keys.
25-- * The same source key may not be moved to two destination keys.
26-- * Any key that is the source of a Move must also be edited
26-- * Any key that is the source of a Move must also be edited
27-- (otherwise, the Move would duplicate it)
27-- (otherwise, the Move would duplicate it)
28−data PatchMapWithMove k v = PatchMapWithMove (Map k (NodeInfo k v)) deriving (Show, Eq, Ord, Functor, Foldable, Traversable)
28+newtype PatchMapWithMove k v = PatchMapWithMove (Map k (NodeInfo k v)) deriving (Show, Eq, Ord, Functor, Foldable, Traversable)
30data NodeInfo k v = NodeInfo
30data NodeInfo k v = NodeInfo
31 { _nodeInfo_from :: !(From k v)
31 { _nodeInfo_from :: !(From k v)