entityToDocument :: (PersistEntity record, PersistEntityBackend record ~ DB.MongoContext)
                 => record -> DB.Document
entityToDocument = recordToDocument
entityToDocument :: (PersistEntity record, PersistEntityBackend record ~ DB.MongoContext)
                 => record -> DB.Document
entityToDocument = recordToDocument
entityToDocument = recordToDocument