diff --git a/family-tree.cabal b/family-tree.cabal
--- a/family-tree.cabal
+++ b/family-tree.cabal
@@ -10,7 +10,7 @@
 -- PVP summary:      +-+------- breaking API changes
 --                   | | +----- non-breaking API additions
 --                   | | | +--- code changes with no API change
-version:             0.3.1.3
+version:             0.3.1.4
 
 package-url:         https://github.com/Taneb/family-tree
 
@@ -59,7 +59,7 @@
   
   -- Other library packages from which modules are imported.
   build-depends:       base >= 4.3 && < 5,
-                       lens >= 3.8 && < 3.9,
+                       lens >= 3.8 && < 3.10,
                        binary < 0.7,
                        unordered-containers ==0.2.*,
                        containers >=0.4.2 && < 0.6,
diff --git a/src/Data/FamilyTree.hs b/src/Data/FamilyTree.hs
--- a/src/Data/FamilyTree.hs
+++ b/src/Data/FamilyTree.hs
@@ -384,7 +384,7 @@
       IS.foldr (\i -> events . ix i . eventAttendees %~ IS.insert n) (
       people . ix n .~ newPerson $ familyTree)
 
--- | Constructs a lens for the manipulation of a family in a family tree, from
+-- | Constructs a 'Traversal' for the manipulation of a family in a family tree, from
 -- that family's ID.
 traverseFamily :: FamilyID -> IndexedTraversal' FamilyID FamilyTree Family
 traverseFamily (FamilyID n) f familyTree = case familyTree ^. families . at n of