bootzooka7.scala

def changePassword(userId: Id @@ User, 
                     currentPassword: String, 
                     newPassword: String): ConnectionIO[Unit] =
    for {
      user <- userOrNotFound(UserModel.findById(userId))
      _ <- verifyPassword(user, currentPassword)
      _ = logger.debug(s"Changing password for user: $userId")
      _ <- UserModel.updatePassword(userId, User.hashPassword(newPassword))
    } yield ()