collectionName :: (PersistEntity record, PersistEntityBackend record ~ DB.MongoContext)
               => record -> Text
collectionName = unDBName . entityDB . entityDef . Just
collectionName :: (PersistEntity record, PersistEntityBackend record ~ DB.MongoContext)
               => record -> Text
collectionName = unDBName . entityDB . entityDef . Just
collectionName = unDBName . entityDB . entityDef . Just