(Entity _ __auth) <- lift $ requireAuth