diff options
Diffstat (limited to 'src/Xanthous/Data/EntityMap.hs')
| -rw-r--r-- | src/Xanthous/Data/EntityMap.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xanthous/Data/EntityMap.hs b/src/Xanthous/Data/EntityMap.hs index 401e395547e1..e713aff32c6b 100644 --- a/src/Xanthous/Data/EntityMap.hs +++ b/src/Xanthous/Data/EntityMap.hs @@ -101,7 +101,7 @@ _EntityMap = iso hither yon yon poses = alaf Endo foldMap (uncurry insertAt) poses emptyEntityMap instance Semigroup (EntityMap a) where - em₁ <> em₂ = alaf Endo foldMap (uncurry insertAt) (em₁ ^. _EntityMap) em₂ + em₁ <> em₂ = alaf Endo foldMap (uncurry insertAt) (em₂ ^. _EntityMap) em₁ instance Monoid (EntityMap a) where mempty = emptyEntityMap |