family-tree 0.3.1.2 → 0.3.1.3

raw patch · 2 files changed

+3/−3 lines, 2 files

Files

• family-tree.cabal +1/−1
• src/Data/FamilyTree.hs +2/−2

@@ -10,7 +10,7 @@ -- PVP summary:      +-+------- breaking API changes --                   | | +----- non-breaking API additions --                   | | | +--- code changes with no API change-version:             0.3.1.2+version:             0.3.1.3  package-url:         https://github.com/Taneb/family-tree 

@@ -452,9 +452,9 @@     \fam -> fam &             head1 %~ (id & ix (Just $ PersonID n) .~ Nothing) &             head2 %~ (id & ix (Just $ PersonID n) .~ Nothing) &-            children . ix n .~ False+            children . contains n .~ False             ) &-  events %~ IM.map (eventAttendees . ix n .~ False)+  events %~ IM.map (eventAttendees . contains n .~ False)  -- | Deletes a family from the family tree, removing all references to it.     deleteFamily :: FamilyID -> FamilyTree -> FamilyTree