@@ -461,6 +461,7 @@ data VersionControl = NoVersionControl
461461{-| 'DocumentParent' is used to specify a parent document.
462462-}
463463newtype DocumentParent = DocumentParent DocId
464+ deriving (Eq, Show)
464465
465466{-| 'IndexDocumentSettings' are special settings supplied when indexing
466467a document. For the best backwards compatiblity when new fields are
@@ -469,7 +470,7 @@ added, you should probably prefer to start with 'defaultIndexDocumentSettings'
469470data IndexDocumentSettings =
470471 IndexDocumentSettings { idsVersionControl :: VersionControl
471472 , idsParent :: Maybe DocumentParent
472− }
473+ } deriving (Eq, Show)
473474
474475{-| Reasonable default settings. Chooses no version control and no parent.
475476-}